Appendix A 




Appendix A illustrates semantic types that may be supported and their corresponding 
adaptive template names. For example, the Pipelined semantic type is made up of, in this order, 
the map_keys the pipe_state and the index fact adaptive templates. The example pre-parsed and 
5 post parsed SQL adaptive templates are then provided. 

As mentioned previously, the use of the semantic types significantly reduces the amount of 
work needed to implement the datamart 1 50. By selecting a semantic type for a particular fact 
:i =5 table or dimension table, the consultant automatically selects the corresponding pre-parsed SQL 

ip adaptive templates. The selected adaptive templates are then automatically converted into post 

W parsed SQL statements that include the schema specific information for the datamart 150. 

J! Additionally, these post parsed SQL statements include the SQL for accessing and manipulating 
□ the datamart 1 50 tables. 

: IP 





Pipelined 

map_keys 

Pipelined 

pipe_state 

Pipelined 

index_fact 

Pipelined/Unjoined 

upd_unj 

Pipelined/Unjoined 

map_keys 

Pipelined/Unjoined 

pipe_state 

Pipelined/Unjoined 

index_fact 

Slowly Changing Dimensions 

insert_dim 

Slowly Changing Dimensions 

index_dim 

Transactional 

map_keys 

Transactional 

load_trans 

Transactional 

ren_trans 

Transactional 

index_fact 

T ransactional/lnventory 

map_keys 
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Transactional/Inventory 

load_trans 

Transactional/Inventory 

inv_adjust 

Transactional/Inventory 

index_fact 

Transactional/Inventory/ForceZero 

map_keys 

Transactional/Inventory/ForceZero 

load_trans 

Transactional/Inventory/ForceZero 

force_zero 

Transactional/Inventory/ForceZero 

inv_adjust 

Transactional/Inventory/ForceZero 

index_fact 

Transactional/Inventory/ForceZero/Unjoined 

upd_unj 

Transactional/Inventory/ForceZero/Unjoined 

map_keys 

Transactional/Inventory/ForceZero/Unjoined 

load_trans 

Transactional/Inventory/ForceZero/Unjoined 

force_zero 

Transactional/Inventory/ForceZero/Unjoined 

inv_adjust 

Transactional/Inventory/ForceZero/Unjoined 

index_fact 

Transactional/Inventory/Unjoined 

upd_unj 

T ra nsactional/l nventory/U njoined 

map_keys 

Transactional/Inventory/Unjoined 

load_trans 

Transactional/Inventory/Unjoined 

inv_adjust 

Transactional/Inventory/Unjoined 

index_fact 

Transactional/Statelike 

map_keys 

Transactional/Statelike 

load_trans 

Transactional/Statelike 

load_state 

Transactional/Statelike 

index_fact 

T ransactional/Statelike/ForceClose 

map_keys 

Transactional/Statelike/ForceClose 

load_trans 

Transactional/Statelike/ForceClose 

force_close 

Transactional/Statelike/ForceClose 

load_state 

Transactional/Statelike/ForceClose 

index_fact 

Transactional/Statelike/ForceClose/Unjoined 

upd_unj 

Transactional/Statelike/ForceClose/Unjoined 

map_keys 

Transactional/Statelike/ForceClose/Unjoined 

load_trans 

Transactional/Statelike/ForceClose/Unjoined 

force_close 

Transactional/Statelike/ForceClose/Unjoined 

load_state 
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Transactional/Statelike/ForceClose/Unjoined 

index_fact 

T ransactional/Statelike/Unjoined 

upd_unj 

Transactional/Statelike/Unjoined 

map_keys 

Transactional/Statelike/Unjoined 

load_trans 

Transactional/Statelike/Unjoined 

!oad_state 

Transactional/Statelike/Unjoined 

index_fact 

Transactional/Unjoined 

upd_unj 

Transactional/Unjoined 

map_keys 

T ransactional/Unjoined 

load_trans 

Transactional/Unjoined 

ren_trans 

T ransactional/U njoined 

index_fact 


The following are the pre-parsed pseudo-SQL source for the adaptive templates. 





— #TEMPLATE_BEGIN # force_close 

/******************************************** *****************************★***★★***/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— force_close 

— Close out deleted orders - those that no longer appear in the 

— staging table 

— SEE SAFETY VALVE BELOW 

y***********************************************************************-*********** y 

/*★*******************★★** **********************+******************************+**+y 

— Delete temporary tables 

y**********************************************************************************y 

— #BLOCK_BEGIN# DropTemps 

$$DDL_BEGIN 

$ $ DROP_TABLE_I F_EX I STS [ $ $ FCTTBL [ ] _FC 3 
$$DDL_END 

— #BLOCK_END# DropTemps 

y*********************+*********+****************+*********************************y 

— Insert negative BOOKS for deleted orders 

— FC: ForceClose 

y**************************************************************************+*+*****y 

— #BLOCK_BEGIN# MakeFC 

$ $ SELECT_INTO_BEGIN [ $ $ FCTTBL [ ] _FC ] 

SELECT 

f .iss, 
f . ss_key, 

MAX (f .date_key) date_key, 

MIN(f. transtype key) transtype key, 
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MAX(f.seq) + 1 seq 
f .$$DIMKEYR_01 
f .$$DIMKEYR_02 
f .$$DIMKEYR_03 
f .$$DIMKEYR_04 
f ,$$DIMKEYR_05 
f .$$DIMKEYR_06 
f .$$DIMKEYR_07 
f .$$DIMKEYR_08 
f .$$DIMKEYR_09 
f ,$$DIMKEYR_10 
f ,$$DEGKEY_01 
f . $ $ DEGKE Y_0 2 
f . $$DEGKEY 03 


isaS 



V. 


-SUM ( f . $ $ FCTCOL_00 1 ) 
-SUM { f . $ $ FCTCOL _002 ) 
-SUM ( f . $ $ FCTCOL_003 ) 
-SUM { f . $ $ FCTCOL_0 04 ) 
-SUM { f . $ $ FCTCOLJD 0 5 ) 
-SUM { f . $ $ FCTCOL_0 0 6 ) 
-SUM { f . $$ FCTCOL_007 ) 
- S UM ( f . $ $ FCTCOL_0 0 8 ) 
- SUM ( f . $ $ FCTCOL_0 0 9 ) 
- SUM ( f . $ $ FCTCOL_0 1 0 ) 
- SUM { f . $ $ FCTCOL_0 1 1 ) 
- SUM ( f . $ $ FCTCOL_0 1 2 ) 
- SUM ( f . $ $ FCTCOL_0 1 3 ) 
- SUM ( f . $ $ FCTCOL_0 1 4 ) 
- SUM ( f . $ $ FCTCOL_0 1 5 ) 
- S UM ( f . $ $ FCTCOL_0 1 6 ) 
-SUM ( f . $ $ FCTCOL_0 1 7 ) 
- SUM ( f . $ $ FCTCOL_0 1 8 ) 
- SUM ( f . $ $ FCTCOL_0 1 9 ) 
-SUM ( f . $ $ FCTCOL _02 0 ) 
-SUM ( f . $$FCTCOL_021) 
-SUM { f . $$FCTCOL_022) 
-SUM { f . $ $ FCTCOL_02 3 ) 
-SUM ( f . $ $ FCTCOL_0 2 4 ) 


$ $ FCTCOL_0 0 1 
$ $ FCTCOL_0 0 2 
$ $ FCTCOL_0 0 3 
$$FCTCOL_004 
$ $ FCTCOL_0 0 5 
$ $ FCTCOL_0 0 6 
$ $ FCTCOL_0 0 7 
$ $ FCTCOL_0 0 8 
$$FCTCOL_009 
$ $ FCTCOL_0 1 0 
$ $ FCTCOL_0 1 1 
$ $ FCTCOL_0 1 2 
$ $ FCTCOL_0 1 3 
$ $ FCTCOL_0 1 4 
$ $ FCTCOL_0 1 5 
$ $ FCTCOL_0 1 6 
$ $ FCTCOL_0 1 7 
$ $ FCTCOL_0 1 8 
$ $ FCTCOL_0 1 9 
$ $ FCTCOL_0 2 0 
$ $ FCTCOL_0 2 1 
$ $ FCTCOL_0 2 2 
$ $ FCTCOL_02 3 
$ $ FCTCOL_02 4 





aJ 


$ $ SELECT_INTO_BODY [ $ $ FCTTBL [ ] _FC ] 

FROM 

$$ FCTTBL [ ] $$CURR f 

WHERE 

NOT EXISTS 

(SELECT 1 FROM $ $ FSTGTBL [ ] _MAP s WHERE s.iss = f.iss 

GROUP BY 

f.iss, 
f . ss_key 

, f .$$DIMKEYR_01 

, f ,$$DIMKEYR_02 

, f .$$DIMKEYR_03 

, f .$$DIMKEYR_04 

, f ,$$DIMKEYR_05 

, f .$$DIMKEYR_06 

, f .$$DIMKEYR_07 

, f ,$$DIMKEYR_08 

, f .$$DIMKEYR_09 

, f .$$DIMKEYR_10 

, f . $ $ DEGKE Y_0 X 

, f . $$DEGKEY_02 

, f . $$ DEGKE Y 03 


HAVING 

( 

( SUM ( f . $ $ FCTCOL_0 0 1 ) <> 0) 
OR (SUM ( f . $$FCTCOL_002 ) <> 0) 
OR (SUM ( f . $$FCTCOL_003) <> 0) 
OR (SUM ( f . $$FCTCOL_004 ) <> 0) 
OR (SUM ( f . $$FCTCOL_005) <> 0) 
OR (SUM (f.$$ FCTCOL 006) <> 0) 
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OR 

( SOM ( f . $ $ FCTCOL 007) 

<> 

0) 

OR 

( SUM ( f . $ $ FCTCOL 008) 

<> 

0) 

OR 

( SOM ( f . S $ FCTCOL 009) 

<> 

0) 

OR 

( SUM (£.$$ FCTCOL 010) 

<> 

0) 

OR 

( SOM ( £ . $ $ FCTCOL 011) 

<> 

0) 

OR 

( SUM (£.$$ FCTCOL 012) 

<> 

0) 

OR 

( SUM (f.$$ FCTCOL 013) 

<> 

0) 

OR 

( SUM ( f . $ $ FCTCOL 014) 

<> 

0) 

OR 

( SUM ( f . $ $ FCTCOL 015) 

<> 

0) 

OR 

( SUM (f.$$ FCTCOL 016) 

<> 

0) 

OR 

( SUM (f.$$ FCTCOL 017) 

<> 

0) 

OR 

( SUM ( f . $ $ FCTCOL 018) 

<> 

0) 

OR 

( SUM ( f . $ $ FCTCOL 019) 

<> 

0) 

OR 

( SUM ( f . $ $ FCTCOL 020) 

<> 

0) 

OR 

( SUM (f.$$ FCTCOL 021) 

<> 

0) 

OR 

( SUM ( f . $ $ FCTCOL 022) 

<> 

0) 

OR 

( SUM ( f . $ $ FCTCOL 023) 

<> 

0) 

OR 

( SUM ( f . $ $ FCTCOL_02 4 ) 
\ 

<> 

0) 

/ 

AND 


MIN { f . transtype_key) 

<= 

99 

AND 


MIN ( f . transtype_key) 

>= 

1 

— #BLOCK_END# MakeFC 




/******************************************** **************★***********★***********/ 

— SAFETY VALVE - THIS PROC ONLY DOES ANYTHING 
—IF THE STAGING TABLE HAS AT LEAST ONE ROW 

/*** + ****************************************** ************************************/ 

— #BLOCK_BEGIN# SafetyValue 

DECLARE $$VAR[count_MAP] $$EPIINT$$EOS 

BEGIN 

$ $ VAR_AS S I GN_BEGI N [ coun t_MAP ] 

SELECT COUNT (1) 

$ $ VAR_AS S I GN_I NTO [ C oun t_MAP ] 

FROM $$FSTGTBL[]_MAP 
$ $ VAR_AS S I GN_EN D 

$$IF[ ($$VAR[count_MAP] = 0)] 

DELETE FROM $ $ FCTTBL [ ] _FC$ $ EOS 
$ $ END_I F 

END$$EOS 

— #BLOCK_END# SafetyValue 

/**********************************************************************************/ 

— Count processed, inserted rows 

/*************★★************★***********★**+****★**********+********★**■**★****★**★* / 

— #BLOCK_BEGIN# SPResults 

BEGIN 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'PROCESSED', COUNT (1) FROM $$ FCTTBL [] $$CURR$$ EOS 

INSERT INTO adapt ive_template_pr of ile (token_name, number_rows) 

SELECT 'INSERTED', COUNT(l) FROM $$ FCTTBL []_FC$$ EOS 

END$$EOS 

— #BLOCK_END# SPResults 
— #TEMPLATE END# force close 
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— # TEMPLATE BEGIN# load state 


y***********************************************************************************/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— load_state 

— Load order bookings into fact table by creating transactional 

— data from state data 

— load_trans must be run before this procedure to create TIN table 

/★** + ★★★★*★**★* + *★* + ★***★***★* + ★**•**★★***+★•*■★•*★★***★*★★*** + **★*** + + ★★★★******★* + ★**★/ 

/*********************** ************************************************************y 

— Delete temporary tables 

/***************★*** *+***+**★******************★****★★*★★*★*•*★*★+***★★**★★+**★★ ****★/ 

~#BLOCK_BEGIN# DropTemps 

$$DDL_BEGIN 

$ $ DROP_TABLE_I F_EX I STS [ $$FCTTBL [ ] _MFL] 

$ $ DROP _T ABLE_I F_EX I ST S [ $ $ FCTTBL [ ] _1 ST ] 

$ $ DROP_TABLE_I F_EX I STS [ $ $ FCTTBL [ ]_IL] 

$ $ DROP_TABLE_I F_EX I STS [ $ $ FCTTBL [ ] _IR] 

$$DROP_TABLE_IF_EXISTS [ $$FCTTBL [ ] _IRD] 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL [ ] _IND] 

$ $ DRO P_T AB L E_ I F_EX I S T S [ $$ FCTTBL [ ] _NFD] 

$ $DROP_TABLE_IF_EXI STS [$$ FCTTBL [ ]_IRM] 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL [ ] _I DM ] 

$ $ D RO P_T AB L E_I F_EXI STS [ $ $ FCTTBL [ ] _ILM ] 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL [ ] _IMI ] 

$$DDL_END 

--#BLOCK_END# DropTemps 

y*****+****************+****+*******************+******************y 

— Set join order for SQL Server 

y******************************************************************/ 

— #BLOCK_BEGIN# ForcePlanOn 
$$SQLSERVER[SET FORCEPLAN ON] 

— #BLOCK_END# ForcePlanOn 

y***********************+*******************************************+****+****++****y 

— Remove rows older than fact table - history can not be rewritten - only 

— the last date for an order can be changed. Note that we compare transtype's 

— because SHIP type transactions might occur at a later date and we don't want 

— those to interfere 

— Also, since the staging table may have multiple entries for a given order on 

— a single day - we assume that the list one inserted in the Staging table will 

— be used (since ikey is an IDENTITY column) 

— Note that a given ss_key must use the same Booking transtype for all of time, 

— otherwise the transtype_key 

— MFL : Mapped Filtered 

y***************+**-************+*************************+***************+**********y 

— #BLOCK_BEGIN# MakeMFL 

$$SELECT_INTO_BEGIN ($$ FCTTBL ( ] _MFL] 

SELECT 

s . * 

$ $ SELECT_INTO_BOD Y [ $ $ FCTTBL [ ] _MFL ] 

FROM 
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$$FSTGTBL[ ]_MAP s, bus_process b 

WHERE 

((s.datejcey >= (SELECT MAX (date_key) FROM $$FCTTBL [ ] $$CURR f WHERE 
s.iss - f.iss AND s.ss_key = f.ss_key AND 
s . transtype_key = f . transtype_key) ) 

OR NOT EXISTS (SELECT * FROM $ $ FCTTBL [ ] $ $CURR f WHERE 
s.iss = f.iss AND s.ss_key = f.ss_key AND 
s . transtype_key =* f . transtype_key) ) 

AND s.ikey = (SELECT MAX(t.ikey) FROM $ $ FSTGTBL [ ] _MAP t WHERE 
s.iss = t.iss AND 
s.ss_key = t.ss_key AND 

s. date_key.= t.date_key AND 

t . process_key = b.process_key) 

AND 

s.process_key « b .process_key AND b .process_name = 'LoadState' 

— #BLOCK_END# MakeMFL 

y***********************************************************************************y 

— Index MFL table for later queries 

y***********************************************************************************y 

— #BLOCK_BEGIN# IndexMFL 

$$DDL_BEGIN 

$$DDL_EXEC[ 

CREATE INDEX X$ $ FCTTBL [] _MFL ON $$ FCTTBL [] _MFL 
( 

iss, ss_key, date_key 

) 

] 

$$DDL_END 

— # BLOC K_EN D# IndexMFL 

y*************************************************************************** ******** y 

— Get oldest state rows' for each unique sskey 

— We need to treat the first entry for each order 

— in the staging table separately from all others, since 

— only the first entry needs to be compared with 

— already existing fact entry rows to create transactions. 

— All subsequent dates for that order in the Fact table 

— can be delta 'd with other staging table entries - see the 

— section below on Pairwise deltas. 

-- MFL should be indexed 

— 1ST: The first record for each iss, ss_key 

y************************************************************** ********************* y 

— #BLOCK_BEGIN# MakelST 

$ $ SELECT_INTO_BEGIN [ $ $ FCTTBL [ ] _1 ST ] 

SELECT 

s . * 

$ $ SELECT_INTO_BODY ( $ $ FCTTBL {] _1 ST ] 

FROM 

$$ FCTTBL []_MFL s 

WHERE 

s.datejcey = (SELECT MIN (date_key) FROM $$ FCTTBL (]_MFL t WHERE 
s.iss = t.iss AND s.ss_key = t.ss_key) 

— #BLOCK_END# MakelST 

y*********************************************************************************** y 

— Index 1ST for later queries 

y************************** **************************************************** *****y 
— #BLOCK BEGIN# IndexlST 
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$$DDL_BEGIN 
$ $ DDL_EXEC [ 

CREATE UNIQUE INDEX XPK$ $ FCTTBL [ ] _1 ST ON $ $ FCTTBL [ ] _1 ST 
( 

iss, ss_key 

) 

] 

$ $ DDL_END 

— #BLOCK_END# IndexlST 

y***********************************************************************************/ 

— Insert negative BOOKS for changed dim keys 

— This query will add up all existing Books and Loss's 
-- for this order and the net facts will be cancelled out 

— with the old Dimension keys . Note that an invariant of this 

— procedure is that only one set of dimensions at a time 

— can have non-zero facts. 

— Fact table Should be indexed 

— HAVING Clause is needed to prevent changing of dimensions 

— on fully shipped order from causing a transaction - no sense 

— creating fact rows with all zero's in them 

— Note that we increment the sequence number just' in case 

— this new transaction occurs on the same date as the last 

— existing one in the fact table - to avoid index errors 

— IL: InsertLost 

y***********************************************************************************/ 

— # BLOCK_BEGI N # MakelL 

$ $ SELECT_INTO_BEGI N [ $ $ FCTTBL [ ] I L ] 

SELECT 

s .iss, 
s.ss_key, 
s ,date_key, 
s . transtype_key, 

MAX(f.seq) + 1 seq 
, f .$$DIMKEYR_01 

, f .$$DIMKEYR_02 

, f ,$$DIMKEYR_03 

, f .$$DIMKEYR_04 

, f ,$$DIMKEYR_05 

, f ,$$DIMKEYR_06 

, f .$$DIMKEYR_07 

, f .$$DIMKEYR_08 

, f .$$DIMKEYR_09 

, f ,$$DIMKEYR_10 

, f . $ $ DEGKEY_0 1 

, f . $ $ DEGKEY_02 

, f . $$DEGKEY_03 

, -SUM ( f . $$FCTCOL_001 ) $$FCTCOL_001 

, -SUM ( f . $$FCTCOL_002 ) $$FCTCOL_002 

, -SUM { f . $$FCTCOL_003 ) $$FCTCOL_003 

, -SUM ( f . $ $ FCTCOL_0 04) $ $ FCTCOL_0 0 4 

, -SUM (f . $$FCTCOL_005 ) $$FCTCOL_005 

, -SUM ( f . $ $ FCTCOL_00 6 ) $ $ FCTCOL_00 6 

, -SUM ( f . $ $ FCTCOL_007 ) $ $ FCTCOL_007 

, -SUM ( f . $ $ FCTCOL_0 0 8 ) $$FCTCOL_008 

# - SUM ( f . $ $ FCTCOL_0 09) $ $ FCTCOL_0 0 9 

, -SUM ( f . $$FCTCOL_010 ) $$FCTCOL_010 

, -SUM ( f . $ $ FCTCOL__0 1 1 ) $$FCTCOL_011 

, -SUM ( f . $ $ FCTCOL_0 12) $$FCTCOL_012 

f -SUM ( f . $ $ FCTCOL_0 1 3 ) $$FCTCOL_013 

, -SUM ( f . $ $ FCTCOL_0 1 4 ) $$FCTCOL_014 

, -SUM ( f . $ $ FCTCOL 015) $$FCTCOL 015 
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, -SUM ( f . $ $ FCTCOL_0 1 6 ) $$FCTCOL_016 

, - SUM ( f . $ $ FCTCOL_0 17) $ $ FCTCOL_0 1 7 

, - SUM ( f . $ $ FCTCOL_0 18) $ $ FCTCOL_0 1 8 

, - SUM { f . $ $ FCTCOL_0 19) $ $ FCTCOL_0 1 9 

, -SUM ( f . $$FCTCOL_020) $$FCTCOL_020 

, -SUM ( f . $$FCTCOL_021 ) $$FCTCOL_021 

, - SUM ( f . $ $ FCTCOL_0 22) $ $ FCTCOL_0 2 2 

, - SUM ( f . $ $ FCTCOL_0 23) $ $ FCTCOL_02 3 

, -SUM ( f . $$FCTCOL_024 ) $$FCTCOL_024 

$$SELECT_INTO_BODY [$$FCTTBL [ ]_IL] 

FROM 

$$FCTTBL[]_1ST S, $ $ FCTTBL [ ] $ $CURR f 

WHERE 

s.iss = f.iss AND s.ss_key = f.ss_key 

AND 

{ (s.$$DIMKEYR_06 <> f . $$DIMKEYR_06) OR 
( S . $ $ DIMKEYR_05 <> f . $$DIMKEYR__05) OR 
(S.$$DIMKEYR_07 <> f . $$DIMKEYR_07) OR 
(s.$$DIMKEYR_04 <> f . $$DIMKEYR_04 ) OR 
(S.$$DIMKEYR__08 <> f . $$DIMKEYR_08 ) OR 
(s.$$DIMKEYR_03 <> f . $$DIMKEYR_03 ) OR 
(s.$$DIMKEYR_09 <> f . $$DIMKEYR_09) OR 
(s.$$DIMKEYR_02 <> f . $$DIMKEYR_02 ) OR 
( S . $ $ DIMKEYR_1 0 <> f ,$$DIMKEYR_10) OR 
( S . $ $ DIMKEYR_0 1 <> f . $$DIMKEYR_01 ) ) 

GROUP BY 

s . iss/ 
s ,ss_key, 
s .date_key, 
s . transtype_key 
, f .$$DIMKEYR_01 

, f .$$DIMKEYR_02 

, f .$$DIMKEYR_03 

, f .$$DIMKEYR_04 

, f .$$DIMKEYR_05 

, f ,$$DIMKEYR_06 

f .$$DIMKEYR_07 
, f .$$DIMKEYR_08 

, f .$$DIMKEYR_09 

, f .$$DIMKEYR_10 

, f . $ $ DEGKE Y_0 1 

, f . $$DEGKEY_02 

, f . $$DEGKEY_03 

HAVING 

MIN (f . transtype_key) = s . transtype_key 

AND 

( 

( SUM ( f . $$FCTCOL_001 ) <> 0) 

OR ( SUM ( f . $ $ FCTCOL_002 ) <> 0) 

OR (SUM ( f . $$FCTCOL_003 ) <> 0) 

OR (SUM ( f . $$FCTCOL_004 ) <> 0) 

OR (SUM ( f . $$FCTCOL_005 ) <> 0) 

OR { SUM < f . $ $ FCTCOL_0 0 6 ) <> 0) 

OR { SUM ( f . $ $ FCTCOL_0 0 7 ) <> 0) 

OR (SUM ( f . $$FCTCOL_008 ) <> 0) 

OR (SUM ( f . $$FCTCOL_009 ) <> 0) 

OR ( SUM ( f . $ $ FCTCOL_0 1 0 ) <> 0) 

OR (SUM ( f . $$FCTCOL_011 ) <> 0) 

OR (SUM ( f . $$FCTCOL_012 ) <> 0) 

OR ( SUM ( f . $ $ FCTCOL_0 1 3 ) <> 0) 

OR ( SUM ( f . $ $ FCTCOL_0 1 4 ) <> 0) 

OR ( SUM ( f . $$FCTCOL_015) <> 0) 

OR ( SUM ( f . $ $ FCTCOL_0 1 6 ) <> 0) 

OR ( SUM ( f . $ $ FCTCOL_0 1 7 ) <> 0) 

OR ( SUM ( f . $ $ FCTCOL_0 1 8 ) <> 0) 

OR (SUM ( f . $ $ FCTCOL_0 1 9 ) <> 0) 

OR (SUM ( f . $$FCTCOL_020 ) <> 0) 

OR (SUM ( f . $$FCTCOL_021 ) <> 0) 

OR ( SUM ( f . $ $ FCTCOL 022) <> 0) 
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OR ( SUM ( f . $ $ FCTCOL_02 3 ) <> 0) 

OR ( SUM ( f . $ $ FCTCOL_0 2 4 ) <> 0) 

) 

— #BLOCK_END# MakelL 

/***********************************************************************************/ 

— Index IL for later queries 

y***********************************************************************************/ 

— #BLOCK_BEGIN# IndexIL 

$$DDL_BEGIN 

$$DDL_EXEC[ 

CREATE INDEX XPK$ $ FCTTBL [ ] IL ON $$ FCTTBL [ ]_IL 

t 

iss, ss_key 

) 

] 

$$DDL_END 

— #BLOCK_END# IndexIL 

y***********************************************************************************/ 

— Insert BOOKS for changed dim keys 

— When a dimension changes then just create a booking 

— transaction for whatever we negated above with the new 

— dimension and fact values 

-- 1ST shoud be indexed 

— Note that we add one to whatever we used as the last 

— seq because this transaction occurs on the same 

— date as the negative one above 

— IR: Insert Rebook 

/***********************************************************************************/ 
--#BLOCK BEGIN# MakeIR 


$$SELECT_INTO_BEGIN [$$ FCTTBL [ ] I R ] 

SELECT 

s . iss, 
s . ss_key, 
s .date_key, 

1 . transtype_key, 
l.seq + 1 seq 
, S.$$DIMKEYR_01 

, S.$$DIMKEYR_02 

, s.$$DIMKEYR_03 

, s . $$DIMKEYR_04 

, s.$$DIMKEYR_05 

, s.$$DIMKEYR_06 

, s.$$DIMKEYR_07 

, S.$$DIMKEYR_08 

, S.$$DIMKEYR_09 

, s . $$DIMKEYR_10 

, s . $$DEGKEY_01 

, s . $ $ DEGKEY_02 

, s . $$DEGKEY 03 


- 1 . $ $ FCTCOL_0 0 1 
-1 . $$FCTCOL_002 
-1 . $$FCTCOL_003 
-1 . $$FCTCOL_004 
-1 . $$FCTCOL_005 
-1 . $$FCTCOL_006 
-1 . $$FCTCOL_007 
-l.$$FCTCOL_008 
-1 . $$FCTCOL 009 


$ $ FCTCOL_0 0 1 
$$FCTCOL_002 
$ $ FCTCOL_0 0 3 
$ $ FCTCOL_0 0 4 
$$FCTCOL_005 
$ $ FCTCOL_0 0 6 
$ $ FCTCOL_0 0 7 
$ $ FCTCOL_0 0 8 
$$FCTCOL 009 
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■ 1 . $ $ FCTCOL_0 1 0 
1 . $ $ FCTCOL_0 1 1 
1 . $ $ FCTCOL_0 1 2 
1 . $ $ FCTCOL_0 1 3 
1 . $ $ FCTCOL_0 1 4 
1 . $ $ FCTCOL_0 1 5 
1 . $ $ FCTCOL_0 1 6 

■ 1 . $ $ FCTCOL_0 1 7 
1 . $ $ FCTCOL_0 1 8 
1 . $ $ FCTCOL_0 1 9 
1 . $ $ FCTCOL_02 0 
1 . $ $ FCTCOL_02 1 
1 . $ $ FCTCOL_02 2 
1 . $$FCTCOL_023 
l.$$FCTCOL 024 


$ $ FCTCOL_0 1 0 
$ $ FCTCOL_0 1 1 
$ $ FCTCOL_0 1 2 
$ $ FCTCOL_0 1 3 
$ $ FCTCOL_0 1 4 
$ $ FCTCOL_0 1 5 
$ $ FCTCOL_0 1 6 
$ $ FCTCOL_0 1 7 
$ $ FCTCOL_0 1 8 
$ $ FCTCOL_0 1 9 
$ $ FCTCOL_0 2 0 
$ $ FCTCOL_0 2 1 
$ $ FCTCOL_0 2 2 
$ $ FCTCOL_0 2 3 
$ $ FCTCOL 024 


$ $ SELECT_INTO_BODY [ $ $ FCTTBL [ ] _IR] 

FROM 

$ $ FCTTBL [ ] _I L 1, $$FCTTBL[]_1ST s 
WHERE l.iss = s.iss AND l.ss_key = s.ss_key 

— #BLOCK_END# MakeIR 

/************+*+********+***********************************************************/ 

— Insert BOOKS for changed dim keys where fact 

— also changed 

— When a dimension changes at the same time as 

— a fact then we need to make up the fact difference 


— 1ST shoud be indexed 


— Note that we add two to whatever we used as the last 

— seq because this transaction occurs on the same 

— date as the negative and positive ones above 

— Note also that the Left Outer join uses transtype_key 

— so that only the Bookings at the old value will be counted. 

— Whereas above for the negative transaction value 

— we want to include Shipments in our calculation, here 

— we only want to see how Booking Facts have changed. 

— Here again, only one Booking transaction type is supported 

— per ss_key 

— IRD: Insert Rebook delta 

/************************************************** ******************** **★★★★********/ 

— #BLOCK_BEGIN# MakeIRD 

$$SELECT_INTO_BEGIN [ $$FCTTBL [ ] _IRD] 

SELECT 


s . iss, 
s . ss_ key, 
s .date_key, 
s . transtype_key, 
l.seq + 2 seq 
S.$$DIMKEYR_01 
s . $$DIMKEYR_02 
S.$$DIMKEYR_03 
S.$$DIMKEYR_04 
S . $$DIMKEYR_05 
S . $$DIMKEYR_06 
S . $$DIMKEYR_07 
S.$$DIMKEYR_08 
S.$$DIMKEYR_09 
S . $ $ DIMKEYR_1 0 
s . $ $ DEGKE Y_0 1 
s . $ $ DEGKEY_02 
s . $$DEGKEY 03 
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MAX ( S . $ $ FCTCOL_0 01)- $ $NVL [ SUM ( f . $ $ FCTCOL_0 0 1 ) 
MAX ( s . $ $ FCTCOL_002 ) -$ $NVL [ SUM ( f . $ $FCTCOL_002 ) 
MAX ( s . $ $ FCTCOL_0 03)- $ $NVL [ SUM ( f . $ $ FCTCOL_0 0 3 ) 
MAX ( s . $ $ FCTCOL_0 04)- $ $NVL [ SUM ( f . $ $ FCTCOL_0 0 4 ) 
MAX ( S . $ $ FCTCOL_0 05)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 0 5 ) 
MAX ( s . $ $ FCTCOL_0 06)- $ $NVL [ SUM ( f . $ $ FCTCOL_0 0 6 ) 
MAX ( S . $ $ FCTCOL_0 07)- $ $NVL [ SUM ( f . $ $ FCTCOL_007 ) 
MAX ( S . $ $ FCTCOL_0 08)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 0 8 ) 
MAX { s . $$FCTCOL_009) - $ $NVL [ SUM ( f . $ $ FCTCOL_0 0 9 ) 
MAX ( s . $$FCTCOL_010 ) -$$NVL [ SUM ( f . $$FCTCOL_010 ) 
MAX ( s . $ $ FCTCOL_0 11)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 1 1 ) 
MAX ( S . $ $ FCTCOL_0 12)-$$NVL[SUM(f.$$ FCTCOL_0 1 2 ) 
MAX ( S . $ $ FCTCOL_0 13)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 1 3 ) 
MAX ( s . $ $ FCTCOL_0 14)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 1 4 ) 
MAX (s . $$FCTCOL_015 ) -$$NVL [SUM ( f . $$FCTCOL_015) 
MAX { S . $ $ FCTCOL_0 16)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 1 6 ) 
MAX ( s . $ $ FCTCOL_0 17)-$$NVL[SUM(f.$$ FCTCOL_0 1 7 ) 
MAX ( s . $ $ FCTCOL_0 18)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 1 8 ) 
MAX ( s . $ $ FCTCOL_0 1 9 ) -$$NVL [SUM ( f . $ $ FCTCOL_0 1 9 ) 
MAX ( s . $ $ FCTCOL_0 20)-$$NVL[SUM(f.$$ FCTCOL_0 2 0 ) 
MAX ( s . $ $ FCTCOL_02 1 ) -$ $NVL [ SUM < f . $ $ FCTCOL_02 1 ) 
MAX ( s . $ $ FCTCOL_0 2 2 ) - $ $ N VL [ S UM < f . $ $ FCTCOL_0 2 2 ) 
MAX (s . $$FCTCOL_023) -$$NVL [SUM < f . $$FCTCOL_023) 
MAX ( s . $ $ FCTCOL_0 24)- $ $NVL [ SUM ( f . $ $ FCTCOL_0 2 4 ) 


0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 


$ $ FCTCOL_0 0 1 
$ $ FCTCOL_0 02 
$ $ FCTCOL_0 0 3 
$ $ FCTCOL_0 0 4 
$$FCTCOL_005 
$ $ FCTCOL_0 0 6 
$ $ FCTCOL_007 
$$FCTCOL_008 
$ $ FCTCOL_0 0 9 
$ $ FCTCOL_0 1 0 
$ $ FCTCOL_0 1 1 
$ $ FCTCOL_0 1 2 
$ $ FCTCOL_0 1 3 
$ $ FCTCOL_0 1 4 
$ $ ECTCOL_0 1 5 
$ $ FCTCOL_0 1 6 
$ $ FCTCOL_0 1 7 
$$FCTCOL_018 
$ $ FCTCOL_0 1 9 
$$FCTCOL_020 
$ $ FCTCOL__0 2 1 
$$FCTCOL_022 
$$FCTCOL_023 
$ $ FCTCOL_02 4 


$ $ S ELECT_I NTO_BODY [$$FCTTBL[]_IRD] 

FROM 

$$FCTTBL[]_IL 1, $$FCTTBL [ ] _1ST s 

$$LOJ_FROM[$$FCTTBL [ ] $$CURR f s.iss = f.iss AND s . ss_key = f.ss_key AND 

s . transtype_key = f . transtype_key] 

WHERE 

l.iss = s.iss AND l.ss_key = s.ss_key 

$$ JOIN_WHERE [s . iss = f.iss (+) AND s.ss_key = f.ss_key (+) AND s . transtype_key = 
f . transtype_key ( + ) ] 

GROUP BY 

s . iss, 
s . ss_key, 
s . date_key, 
s . transtype_key, 

1 . seq 

, s . $$DIMKEYR_01 

, s . $$DIMKEYR_02 

, s.$$DIMKEYR_03 

, s.$$DIMKEYR_04 

, S.$$DIMKEYR_05 

, s.$$DIMKEYR_06 

, s . $$DIMKEYR_07 

, S.$$DIMKEYR_08 

, s.$$DIMKEYR_09 

, s . $$DIMKEYR_10 

, s . $ $ DEGKEY_0 1 

, S.$$DEGKEY_02 

, s . $$DEGKEY 03 


HAVING 

( $$NVL [SUM { f . $$FCTCOL_001 ) 
OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 02 ) 

OR ( $$NVL [SUM ( f . $$FCTCOL_003 ) 

OR ( $$NVL [SUM ( f . $$FCTCOL_004 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_005 ) 

OR ( $$NVL [SUM ( f . $$FCTCOL_006) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_007 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 0 8 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 0 9 ) 

OR { $ $ NVL [ SUM ( f . $ $ FCTC OL_0 1 0 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 1 1 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 1 2 ) 

OR { $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 3 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 4 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 1 5 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL 016) 


0) <> MAX ( s . $$FCTCOL_001 ) ) 
0] <> MAX ( s . $$FCTCOL_002 ) ) 
0] <> MAX (s . $$FCTCOL_003 ) ) 
0] <> MAX(s.$$FCTCOL_004) ) 
0) <> MAX(s.$$FCTCOL_005) ) 
0] <> MAX ( s . $$FCTCOL_006) ) 
0] <> MAX(s.$$FCTCOL_007) ) 
0] <> MAX ( s . $$FCTCOL_008 ) ) 
0] <> MAX(s.$$FCTCOL_009) ) 
0] <> MAX ( s . $ $ FCTCOL_0 10)) 
0] <> MAX ( s . $ $ FCTCOL_0 11)) 
0] <> MAX ( s . $$FCTCOL_012 ) ) 
0] <> MAX ( s . $ $ FCTCOL_0 13)) 
0] <> MAX ( s . $ $ FCTCOL_0 14)) 
0] <> MAX ( S . $ $ FCTCOL_0 15)) 
0] <> MAX ( s . $ $ FCTCOL 016)) 
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OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 17 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 8 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 9 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_02 0 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_02 1 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_02 2 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_02 3 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_02 4 ) 


0] <> MAX ( s . $ $ FCTCOL_0 17)) 
0] <> MAX ( S . $ $ FCTCOL_0 18)) 
03 <> MAX ( s . $ $ FCTCOL_0 19)) 
0] <> MAX (s . $$FCTCOL_020 ) ) 
0] <> MAX (s . $$FCTCOL_021 ) ) 
03 <> MAX (s . $$FCTCOL_022 ) ) 
0] <> MAX (s . $$FCTCOL_023 ) ) 
03 <> MAX (s . $$FCTCOL_024 ) ) 


— # BLOCK END# MakeIRD 


/***********************************************************************************/ 
— Insert BOOKS for. deltas with same dim keys OR for 
-- brand new orders. 


— Note that we DON'T want to count Shipments 

— (so shipment ss_key's should be different from 

— order ss_keys) since we just want bookings to sum up 

— to whatever this transcation says they should be. 

— Fact table should be indexed 

— WHERE clause prevents double booking on changed 

— dimension - if we didn't use the NOT EXISTS clause 

— then this query would repeat the work of the last one 

— above - which we have already taken care of 

— HAVING clause ensures that multiple 0 records don’t 

— get inserted whenever this procedure is run 

— Note that we increment the sequence number just in case 

— this new transaction occurs on the same date as the last 

— existing one in the fact table - to avoid index errors 


— IND: Insert New Delta 

/***********************************************************************************/■ 
— #BLOCK BEGIN# MakeIND 


$$SELECT_INTO_BEGIN[$$FCTTBL[3_IND3 

SELECT 

s .iss, 
s . ss_key, 
s ,date_key, 
s . transtype_key , 

$$NVL [MAX ( f . seq) 03+1 seq 

, s . $ $ DIMKEYR_0 1 

, s . $ $ DIMKEYR_02 

, s . $$DIMKEYR_03 

, s.$$DIMKEYR_04 

, s.$$DIMKEYR_05 

, s . $$DIMKEYR_06 

, s.$$DIMKEYR_07 

, s . $$DIMKEYR_08 

, S.$$DIMKEYR_09 

, s . $$DIMKEYR__10 

, s . $$DEGKEY_01 

, S.$$DEGKEY_02 

, s . $$DEGKEY 03 


MAX ( s . $ $ FCTCOL_0 01)- $ $NVL [ SUM ( f . $ $ FCTCOL_0 0 1 ) 
MAX (s . $$FCTCOL_002 ) -$$NVL [SUM ( f . $$FCTCOL_002 ) 
MAX ( s . $ $ FCTCOL_0 0 3 ) -$$NVL [SUM ( f . $$FCTCOL_003) 
MAX ( S . $ $ FCTCOL_0 04)-$$ NVL [ S UM ( f . $ $ FCTCOL_0 0 4 ) 
MAX ( s . $ $ FCTCOL_0 05)-$$ NVL [ S UM ( f . $ $ FCTCOL_0 0 5 ) 
MAX ( S . $ $ FCTCOL_0 06)- $ $NVL [ SUM ( f . $ $ FCTCOL_0 0 6 ) 
MAX ( S . $ $ FCTCOL_0 07)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 0 7 ) 
MAX ( S . $ $ FCTCOL_0 0 8 ) -$$NVL [ SUM ( f . $$ FCTCOL_008 ) 
MAX ( S . $ $ FCTCOL_0 09)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 0 9 ) 
MAX ( s . $ $ FCTCOL_0 10)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 1 0 ) 
MAX ( S . $ $ FCTCOL 011 ) -$$NVL [ SUM ( f . $$FCTCOL Oil) 


0) $ $ FCTCOL_0 0 1 
03 $$FCTCOL_002 
0) $ $ FCTCOL_0 0 3 
0] $ $ FCTCOL_0 0 4 
0] $ $ FCTCOL_0 0 5 
0] $ $ FCTCOL_0 0 6 
0] $ $ FCTCOL_0 0 7 
0] $ $ FCTCOL_0 0 8 
0) $ $ FCTCOL_0 0 9 
0] $ $ FCTCOL_0 1 0 
03 $ $ FCTCOL 011 
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MAX ( s . $ $ FCTCOL_0 1 2 ) -$$NVL [ SUM ( f . $ $ FCTCOLJ) 12 ) 
MAX ( s . $ $ FCTCOL_0 13)-$ $NVL [ SUM ( f . $ $ FCTCOL_0 1 3 ) 
MAX ( s . $ $ FCTCOL_0 14)-$$ NVL [ SUM ( f . $ $ FCTCOL_0 1 4 ) 
MAX ( s . $ $ FCTCOL_0 15)-$ $N VL [ SUM ( f . $ $ FCTCOL_0 1 5 ) 
MAX ( S . $$ FCTCOL_01 6 ) -$ $NVL [ SUM ( f . $ $ FCTCOL_01 6 ) 
MAX ( s . $ $ FCTCOL_0 17)-$ $NVL [ SUM ( f . $ $ FCTCOL_0 1 7 ) 
MAX ( S . $ $ FCTCOL_0 18)- $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 8 ) 
MAX ( S . $ $ FCTCOL_0 19)-$ $NVL [ SUM ( f . $ $ FCTCOL_0 1 9 ) 
MAX ( s . $ $ FCTCOL_02 0 ) - $ $NVL [ SUM ( f . $ $ FCTCOL_02 0 ) 
MAX ( 3 . $ $ FCTCOL_02 1 ) - $ $NVL [ SUM ( f . $ $ FCTCOL_0 2 1 ) 
MAX ( S . $ $ FCTCOL_022 ) -$ $NVL [ SUM ( f . $ $ FCTCOL_02 2 ) 
MAX ( s . $ $ FCTCOL_02 3 ) -$ $NVL [ SUM { f . $ $ FCTCOL_02 3 ) 
MAX ( S . $ $ FCTCOL_02 4 ) -$ $NVL [ SUM { f . $ $ FCTCOL_02 4 ) 


0] $ $ FCTCOL_0 1 2 
0) $ $ FCTCOL_0 1 3 
0] $ $ FCTCOL_0 1 4 
0] $ $ FCTCOL_0 1 5 
0] $ $ FCTCOL_0 1 6 
0] $ $ FCTCOL_0 1 7 
0] $ $ FCTCOL_0 1 8 
0] $ $ FCTCOL_0 1 9 
0] $ $ FCTCOL_02 0 
0] $ $ FCTCOL_02 1 
0] $ $ FCTCOL_02 2 
0] $ $ FCTCOL_02 3 
0] $$FCTC0L 024 


$ $ SELECT_INTO_BODY [ $ $ FCTTBL [ ] _IND ] 

FROM 

$$ FCTTBL []_1 ST S $$LOJ_FROM [$$ FCTTBL [ ] $$CURR f 

s.iss = f.iss AND s.ss_key = f.ss_key AND f . transtype_key = s . transtype_key] 

WHERE 

NOT EXISTS (SELECT * FROM $$ FCTTBL [ ] _IL WHERE iss = s.iss AND ss_key = s.ss_key) 

$$ JOIN_WHERE [s . iss - f.iss (+) AND s.ss_key = f.ss_key (+) AND s . transtype_key = 
f . transtype_key (+) ] 

GROUP BY 


S .ISS, 

s . ss_key, 
s .date_key, 
s . transtype_key 
s . $$DIMKEYR_01 
s.$$DIMKEYR_02 
S . $$DIMKEYR_03 
s.$$DIMKEYR_04 
S.$$DIMKEYR_05 
S.$$DIMKEYR_06 
S . $ $ DIMKEYR_Q7 
s.$$DIMKEYR_08 
s . $ $ DIMKEYR_09 
s . $ $ DIMKEYR_10 
S . $ $ DEGKE Y_0 1 
S.$$DEGKEY_02 
s. $$ DEGKE Y 03 


HAVING 

( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 0 1 ) 
OR ( $ $NVL [ SUM ( f . $$ FCTCOL_002 ) 

OR ( $$NVL [ SUM ( f . $$FCTCOL_003 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOLJ) 04 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 0 5 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 0 6 ) 

OR ( $$NVL [SUM ( f . $ $ FCTCOL_0 0 7 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 0 8 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 0 9 ) 

OR ( $ $ N VL [ S UM ( f . $ $ FCTCOL_0 1 0 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 1 1 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 2 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 3 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 4 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 5 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 6 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_0 1 7 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 1 8 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 1 9 ) 

OR ( $ $ N VL [ SUM ( f . $ $ FCTCOL_0 2 0 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL J)2 1 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL_0 2 2 ) 

OR ( $ $ NVL [ SUM ( f . $ $ FCTCOL _02 3 ) 

OR ( $ $NVL [ SUM ( f . $ $ FCTCOL_02 4 ) 


0] <> MAX (s . $$FCTCOL_001) ) 
0] <> MAX ( s . $ $ FCTCOL_002 ) ) 
0] <> MAX ( s . $ $ FCTCOL_003 ) ) 
0] <> MAX ( s . $ $ FCTCOL J)04 ) ) 
0] <> MAX (s . $$ FCTCOL J)0 5) ) 
0] <> MAX ( s . $$FCTCOL_006) ) 
0] <> MAX (s . $$FCTCOL_007) ) 
0] <> MAX (s . $$FCTCOL_008) ) 
0] <> MAX ( s . $ $ FCTCOL_0 09)) 
0] <> MAX ( s . $ $ FCTCOL_0 10)) 
0] <> MAX ( s . $ $ FCTCOL_0 11)) 
0] <> MAX ( s . $ $ FCTCOL_0 12)) 
0] <> MAX ( s . $ $ FCTCOL_0 13)) 
0] <> MAX ( s . $ $ FCTCOL_0 14)) 
0] <> MAX ( s . $ $ FCTCOL_0 15)) 
0] <> MAX ( s . $ $ FCTCOL_0 16)) 
0] <> MAX(s.$$FCTCOL_017) ) 
0] <> MAX ( s . $ $ FCTCOL_0 18)) 
0] <> MAX ( s . $ $ FCTCOL_0 19)) 
0] <> MAX ( s . $$FCTCOL_020) ) 
0] <> MAX ( s . $ $ FCTCOL_02 1 ) ) 
0] <> MAX ( s . $ $ FCTCOL_02 2 ) ) 
0] <> MAX ( s . $ $ FCTCOL_02 3 ) ) 
0) <> MAX ( s . $ $ FCTCOL_02 4 ) ) 


— #BLOCK_END# MakeIND 
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— Form pairwise deltas for all rows except earliest for each sskey 

— Each row created in NFD will consist of two sequential entries from the 

— staing table. So if N enties for an order exist in MFL (after we have filtered 

— out same-date duplicates) then all the queries above will deal with the earliest entry, 
whereas 

— all the queries below (including this one) will deal with the N-l deltaing transactions 

— This query assumes that MFL will already have been filtered 

— to have a single record for each order/datekey 

— NFD: Not First Delta 

/★*★★***■***** ****★*★***★***** + ★**★********* + *★+****+**** + ★**★********* + *★*** + ★****** i 

— #BLOCK_BEGIN# MakeNFD 

$ $ SELECT_INTO_BEGIN [ $ $ FCTTBL ( ] _NFD] 

SELECT 

s.iss siss, t.iss tiss 
, s.ss_key sss_key, t.ss_key tss_key 

, s.date_key sdate_key, t.datejcey tdate_key 

, s.transtype_key stranstype_key, t. transtype_key ttranstype_key 

, s . $ $ DIMKEYR_0 1 s$$DIMKEYRj)l, t . $$DIMKEYRJ)1 t$$DIMKEYRJ)l 

, s . $$DIMKEYR_02 s$$DIMKEYR_02, t . $$DIMKEYR_02 t$$DIMKEYR_02 

, s.$$DIMKEYR_03 s$$DIMKEYR_03, t . $$DIMKEYR_03 t$$DIMKEYR_03 

, S.$$DIMKEYR_04 s$$DIMKEYRj)4 , t . $$DIMKEYR_04 t$$DIMKEYRj)4 

, S . $$DIMKEYR_05 s$$DIMKEYRj)5, t . $$DIMKEYR_05 t$$DIMKEYR_05 

, s . $ $ DIMKEYR_0 6 s$$DIMKEYR_06, t . $$DIMKEYR_06 t$$DIMKEYR_06 

, S.$$DIMKEYR_07 s$$DIMKEYR_07, t . $$DIMKEYR_07 t$$DIMKEYR_07 

, s.$$DIMKEYRj)8 s$$DIMKEYR_08, t . $$DIMKEYR_08 t$$DIMKEYRj)8 

, s . $$DIMKEYR_09 S$$DIMKEYRJ>9, t . $$DIMKEYR_09 t $ $ DIMKE YR_0 9 

, S . $ $ DIMKEYR_10 S$$DIMKEYR_10, t . $$DIMKEYRJLO t$$DIMKEYR_10 

, s . $$DEGKEYJ)1 S$$DEGKEY_01, t . $ $ DEGKEYJ 1 t$$DEGKEY_01 

, s . $$DEGKEY_02 s$$DEGKEY_02 , t . $$DEGKEY_02 t$$DEGKEY_02 

, s.$$DEGKEY_03 s$$DEGKEY_03, t . $ $ DEGKEY_0 3 t$$DEGKEY_03 

, s . $ $ FCTCOL_0 0 1 s $ $ FCTCOL_0 01, t . $$FCTCOLJ)01 t$$FCTCOL_001 

, s . $ $ FCTCOL_0 02 s $ $ FCTCOL_0 02, t . $$FCTCOL_002 t$$FCTCOLJ>02 

, s . $ $ FCTCOL_0 0 3 s$$FCTCOL_003, t .$$ FCTCOLJ) 03 t$$ FCTCOLJ) 03 

, s . $ $ FCTCOL_004 s$$ FCTCOLJ) 04 , t . $$FCTCOL_004 t$$FCTCOL_004 

, s . $ $ FCTCOL_0 0 5 s $ $ FCTCOL_0 05, t .$$ FCTCOLJ) 05 t$$FCTCOL_005 

, s . $ $ FCTCOL_0 0 6 s$$FCTCOL_006, t .$$ FCTCOLJ) 06 t$$FCTCOL_006 

, s . $ $ FCTCOL_007 s $ $ FCTCOL_0 07, t .$$ FCTCOLJ) 07 t$$FCTCOL_007 

, s . $ $ FCTCOL_008 S$$FCTCOLJ)08, t .$$ FCTCOLJ) 08 t$$FCTCOL_008 

, s.$$ FCTCOLJ) 09 s$$ FCTCOLJ) 09, t . $$FCTCOL_009 t$$FCTCOL_009 

, s . $ $ FCTCOL_0 1 0 s $ $ FCTCOL_0 10, t . $$FCTCOL_010 t$$ FCTCOLJ) 10 

, s . $ $ FCTCOL_0 1 1 s $ $ FCTCOL_0 1 1 , t . $$FCTCOL_011 t$$FCTCOL_011 

, s . $ $ FCTCOL_0 1 2 s $ $ FCTCOL_0 12, t . $$FCTCOL_012 t$$FCTCOL_012 

, s . $$FCTCOL_013 s $ $ FCTCOL__0 1 3 , t . $ $ FCTCOLJ) 1 3 t$$FCTCOL_013 

, s . $ $ FCTCOL_0 1 4 s$$FCTCOL_014, t . $$FCTCOL_014 t$$FCTCOL_014 

, s . $ $ FCTCOL_0 1 5 s $ $ FCTCOL_0 15, t . $ $ FCTCOL_0 1 5 t$$FCTCOL_015 

, s.$$ FCTCOLJ) 16 s $ $ FCTCOL_0 16, t . $ $ FCTCOL_0 1 6 t$$FCTCOL_016 

, s . $$FCTCOL_017 s$$ FCTCOLJ) 17, t . $$FCTCOL_017 t$$FCTCOL_017 

, s . $ $ FCTCOL_0 1 8 s $ $ FCTCOL_0 18, t . $$FCTCOL_018 t$$FCTCOL_018 

, s . $ $ FCTCOL_0 1 9 s $ $ FCTCOL_0 19, t . $$ FCTCOLJ) 19 t$$ FCTCOLJ) 19 

, s . $$ FCTCOLJ) 20 s $ $ FCTCOL_0 20, t . $$FCTCOL_020 t$$FCTCOL_020 

, s . $ $ FCTCOLJ) 2 1 s $ $ FCTCOL_0 21, t . $$FCTCOL_021 t$$FCTCOL_021 

, s . S$FCTCOL_022 s$$FCTCOL_022, t . $$FCTCOL_022 t$$FCTCOL_022 

, s .$$ FCTCOLJ) 2 3 S $ $ FCTCOL_0 23, t . $$FCTCOL_023 t$$FCTCOL_023 

, s . $$FCTCOL_024 s$$FCTCOL_024, t . $$FCTCOL_024 t$$FCTCOL_024 

$ $ SELECT_INTO_BODY [ $ $ FCTTBL ( ]_NFD] 

FROM 

$$ FCTTBL []_MFL S, $$ FCTTBL [] _MFL t 

WHERE 

s.iss = t.iss AND s.ss_key =» t.ss_key 

AND 

s.date_key =* (SELECT MAX (date_key) FROM $$ FCTTBL [ ]_MFL u WHERE 
u.iss = s.iss AND u.ss_key = s.ss_key AND u.date_key < t.date_key) 

—# BLOCK END# MakeNFD 
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— Insert BOOKS for deltas with same dim keys 

— If the dimensions don't change then we create a 

— new booking order (as long as at least one of the facts 

— have changed) 

— I DM : Insert Delta More 


— #BLOCK BEGIN# MakelDM 


$$SELECT_INTO_BEGIN[$$FCTTBL[]_IDM] 

SELECT 

tiss iss, 
tss_key ss_key, 
tdate_key date_key, 
ttranstype_key transtype_key, 
0 seq 

, t$$DIMKEYR_01 $ $ DIMKEYR_0 1 

, t$$DIMKEYR_02 $$DIMKEYR_02 

, t$$DIMKEYR_03 $$DIMKEYR_03 

, t$$DIMKEYR_04 $$DIMKEYR_04 

, t$$DIMKEYR_05 $$DIMKEYR_05 

, t$$DIMKEYR_06 $$DIMKEYR_06 

, t$$DIMKEYR_07 $$DIMKEYR_07 

, t$$DIMKEYR_08 $$DIMKEYR_08 

, t$$DIMKEYR_09 $$DIMKEYR_09 

, t$$DIMKEYR_10 $ $ DIMKEYR_1 0 

, t $ $ DEGKE Y_0 1 $$ DEGKE Y_01 

, t$$DEGKEY_02 $$ DEGKE Y_02 

, t$$DEGKEY 03 $$ DEGKE Y 03 


t $ $ FCTCOL_0 0 1 - s $ $ FCTCOL_0 0 1 
t $ $ FCTCOL_0 0 2 - s $ $ FCTCOL_0 0 2 
t $ $ FCTCOL_0 0 3 - s $ $ FCTCOL_0 0 3 
t $ $ FCTC OL_0 0 4 - s $ $ FCTCOL_0 0 4 
t $ $ FCTCOL_0 0 5 - S $ $ FCTCOL_0 0 5 
t $ $ FCTCOL_0 0 6 - s $ $ FCTCOL_0 0 6 
t $ $ FCTCOL_0 0 7 - s $ $ FCTCOL_0 0 7 
t $ $ FCTCOL_0 0 8 - s $ $ FCTCOL_0 0 8 
t $ $ FCTCOL_0 0 9 - s $ $ FCTCOL_0 0 9 
t $ $ FCTCOL_0 1 0 - s $ $ FCTCOL_0 1 0 
t $ $ FCTCOL_0 1 1 - S $ $ FCTCOL_0 1 1 
t $ $ FCTCOL_0 1 2 - s $ $ FCTCOL_0 1 2 
t $ $ FCTCOL_0 1 3 - s $ $ FCTCOL_0 1 3 
t $ $ FCTCOL_0 1 4 - s $ $ FCTCOL_0 1 4 
t $ $ FCTCOL_0 1 5 - S $ $ FCTCOL_0 1 5 
t $ $ FCTCOL_0 1 6- s $ $ FCTCOL_0 1 6 
t $ $ FCTCOL_0 1 7 - s $ $ FCTCOL_0 1 7 
t $ $ FCTCOL_0 1 8 - s $ $ FCTCOL_0 1 8 
t $ $ FCTCOL_0 1 9 - s $ $ FCTCOL_0 1 9 
t $ $ FCTCOL_0 2 0 - s $ $ FCTCOL_0 2 0 
t $ $ FCTCOL_0 2 1 - s $ $ FCTCOL_02 1 
t $ $ FCTCOL_0 2 2 - s $ $ FCTCOL_0 2 2 
t $ $ FCTCOL_02 3-s $ $ FCTCOL_0 2 3 
t$$FCTCOL 024-s$$FCTCOL_024 


$ $ FCTCOL_00 1 
$$FCTCOL_002 
$ $ FCTCOL_0 0 3 
$ $ FCTCOL_0 0 4 
$$FCTCOL_005 
$ $ FCTCOL_0 0 6 
$ $ FCTCOL_0 0 7 
$ $ FCTCOL_0 0 8 
$ $ FCTCOL_0 0 9 
$$FCTCOL_010 
$ $ FCTCOL_0 1 1 
$ $ FCTCOL_0 1 2 
$ $ FCTCOL_0 1 3 
$ $ FCTCOL_0 1 4 
$$FCTCOL_015 
$ $ FCTCOL_0 1 6 
$ $ FCTCOL_0 1 7 
$$FCTCOL_018 
$ $ FCTCOL_0 1 9 
$ $ FCTCOL_0 2 0 
$ $ FCTCOL_0 2 1 
$$FCTCOL_022 
$ $ FCTCOL_02 3 
$$FCTCOL_024 


$ $ SELECT_INTO_BODY [ $$ FCTTBL [ ] _IDM] 

FROM 

$ $ FCTTBL [ ] _NFD d 

WHERE 

( 

(s$$DIMKEYR_06 = t $ $ DIMKE YR_0 6 ) AND 
(S$$DIMKEYR_05 = t$$DIMKEYR_05) AND 
( S $ $ DIMKE YR_0 7 - t$$DIMKEYR_07) AND 
( S $ $ DIMKEYR_0 4 = t$$DIMKEYR_04) AND 
(S$$DIMKEYR_08 = t$$DIMKEYR_08) AND 
(s$$DIMKEYR 03 * t$$DIMKEYR 03) AND 
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( S $ $ DIMKEYR_0 9 = t$$DIMKEYR_09) AND 
(S$$DIMKEYR_02 = t$$DIMKEYR_02 ) AND 
(S$$DIMKEYR_10 » t$$DIMKEYR_10) AND 
( s$$DIMKEYR_01 = t$$DIMKEYR_01 ) 

) 

AND 

( 

( s $ $ FCTCOL_0 0 1 <> t $ $ FCTCOL_0 0 1 ) 

OR ( s $ $ FCTCOL_0 02 <> t$$FCTCOL_002 ) 

OR ( s $ $ FCTCOL_0 0 3 <> t$$FCTCOL_003) 

OR ( s $ $ FCTCOL_0 0 4 <> t$$FCTCOL_004 ) 

OR ( S $ $ FCTCOL_0 0 5 <> t$$FCTCOL_005) 

OR ( s $ $ FCTCOL_00 6 <> t$$FCTCOL_006) 

OR <s$$FCTCOL_007 <> t$$FCTCOL_007 ) 

OR ( S $ $ FCTCOL_0 0 8 <> t$$FCTCOL_008) 

OR { s $ $ FCTCOL_0 0 9 <> t$$FCTCOL_009) 

OR ( s $ $ FCTCOL_0 1 0 <> t$$FCTCOL_010) 

OR ( s $ $ FCTCOL_0 1 1 <> t$$FCTCOL_011) 

OR ( s $ $ FCTCOL_0 1 2 <> t$$FCTCOL_012 ) ’ 

OR ( s $ $ FCTCOL_0 1 3 <> t$$FCTCOL_013) 

OR ( s $ $ FCTCOL_0 1 4 <> t$$FCTCOL_014 ) 

OR ( s $ $ FCTCOL_0 1 5 <> t$$FCTCOL_015) 

OR ( S $ $ FCTCOL_0 1 6 <> t$$FCTCOL_016) 

OR ( s $ $ FCTCOL_0 1 7 <> t$$FCTCOL_017) 

OR ( S $ $ FCTCOL_0 1 8 <> t$$FCTCOL_018) 

OR ( s $ $ FCTCOL_0 1 9 <> t$$FCTCOL_019) 

OR ( s $ $ FCTCOL_0 2 0 <> t$$FCTCOL_020) 

OR ( s $ $ FCTCOL_0 2 1 <> t$$FCTCOL_021) 

OR ( s $ $ FCTCOL_0 2 2 <> t$$FCTCOL_022) 

OR ( s $ $ FCTCOL_0 2 3 <> t$$FCTCOL_023) 

OR ( s $ $ FCTCOL_0 2 4 <> t$$FCTCOL_024 ) 

) 

— #BLOCK_END# MakelDM 

/*** + *★*★*** *★★*★*** + **★ ********************** ***************************************/ 

— Insert negative BOOKS for deltas with different dim keys 

— If one of the dimensions change then we first create a lose transaction for 

— all the previous facts. (Negate all the facts from the earlier of the two 

— transactions) 

— ILM: Insert Lost More 

/*********+********** ***************************************************************/ 

— #BLOCK_BEGIN# MakeILM 

$ $ SELECT_INTO_BEGIN [ $ $ FCTTBL ( ] _ILM] 

SELECT 

siss iss, 
sss_key ss_key, 
tdate_key date_key, 
stranstype_key transtype_key, 

0 seq 

, S$$DIMKEYR_01 $$DIMKEYR_01 

, S$$DIMKEYR_02 $$DIMKEYR_02 

, S$$DIMKEYR_03 $$DIMKEYR_03 

, S$$DIMKEYR_04 $$DIMKEYR_04 

, S$$DIMKEYR_05 $$DIMKEYR_05 

, s $ $ DIMKEYR_0 6 $$DIMKEYR_06 

, s $ $ DIMKEYR_07 $$DIMKEYR_07 

, s $ $ DIMKE YR_0 8 $$DIMKEYR_08 

, S$$DIMKEYR_09 $$DIMKEYR_09 

, S$$DIMKEYR_10 $$DIMKEYR_10 

, S $ $ DEGKE Y_0 1 $ $ DEGKE Y_0 1 

, s $ $ DEGKE Y_0 2 $$DEGKEY_02 

, s$$ DEGKE Y_03 $$DEGKEY_03 

, -s$$FCTCOL 001 $$FCTCOL 001 
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, - s $ $ FCTCOL_0 0 2 $$FCTCOL_002 

, - s $ $ FCTCOL_0 0 3 $$FCTCOL_003 

, - s $ $ FCTCOL_0 0 4 $$FCTCOL_004 

, - s $ $ FCTCOL_0 0 5 $$FCTCOL_005 

, - s $ $ FCTCOL_0 0 6 $$FCTCOL_006 

, - S $ $ FCTCOL_0 0 7 $$FCTCOL_007 

, - s $ $ FCTCOL_0 0 8 $$FCTCOL_008 

, - s $ $ FCTCOL_0 0 9 $$FCTCOL_009 

, - s $ $ FCTCOL_0 1 0 $ $ FCTCOL_0 1 0 

, - S $ $ FCTCOL_0 1 1 $$FCTCOL_011 

, - s $ $ FCTCOL_0 1 2 $ $ FCTCOL_0 1 2 

, - s $ $ FCTCOL_0 1 3 $ $ FCTCOL_0 1 3 

, - s $ $ FCTCOL_0 1 4 $ $ FCTCOL_0 1 4 

, - S $ $ FCTCOL_0 1 5 $ $ FCTCOL_0 1 5 

, - s $ $ FCTCOL_0 1 6 $ $ FCTCOL_0 1 6 

, - s $ $ FCTCOL_0 1 7 $ $ FCTCOL_0 1 7 

, - S $ $ FCTCOL_0 1 8 $ $ FCTCOL_0 1 8 

, - s $ $ FCTCOL_0 1 9 $ $ FCTCOL_0 1 9 

, -s$$FCTCOL_020 $ $ FCTCOL_0 2 0 

, -s$$FCTCOL_021 $ $ FCTCOL_0 2 1 

, -s$$FCTCOL_022 $$FCTCOL_022 

, -S$$FCTCOL_023 $$FCTCOL_023 

, -s$$FCTCOL_024 $$FCTCOL_024 

$ $ SELECT_I NTO_BOD Y [ $ $ FCTTBL [ }_ILM] 

FROM 

$ $ FCTTBL [ ] _NFD d 

WHERE 

( 

(s$$DIMKEYR_06 <> t $ $ DIMKEYR_0 6 ) OR 
(S$$DIMKEYR_05 <> t$$DIMKEYR_05 ) OR 
(S$$DIMKEYR_07 <> t$$DIMKEYR_07 ) OR 
(S$$DIMKEYR_04 <> t$$DIMKEYR_04 ) OR 
(s$$DIMKEYR_08 <> t$$DIMKEYR_08 ) OR 
(s$$DIMKEYR_03 <> t$$DIMKEYR_03 ) OR 
(S$$DIMKEYR_09 <> t$$DIMKEYR_09) OR 
( S $ $ DI MKEYR_0 2 <> t$$DIMKEYR_02 ) OR 
(S$$DIMKEYR_10 <> t$$DIMKEYR_10) OR 
( S $ $ DIMKEYR_0 1 <> t$$DIMKEYR_01) 

) 

AND 


( s $ $ FCTCOL_0 0 1 <> 0) 
OR ( s $ $ FCTCOL_0 0 2 <> 0) 

OR (s$$FCTCOL_003 <> 0) 

OR ( s $ $ FCTCOL_0 0 4 <> 0) 

OR ( s $ $ FCTCOL_0 0 5 <> 0) 

OR ( S $ $ FCTCOL_0 0 6 <> 0) 

OR ( s $ $ FCTCOL_0 0 7 <> 0) 

OR ( s $ $ FCTCOL_0 0 8 <> 0) 

OR ( s $ $ FCTCOL_0 0 9 <> 0) 

OR ( s $ $ FCTCOL_0 1 0 <> 0) 

OR ( s $ $ FCTCOL_0 1 1 <> 0) 

OR ( s $ $ FCTCOL_0 1 2 <> 0) 

OR ( S $ $ FCTCOL_0 1 3 <> 0) 

OR ( s $ $ FCTCOL_0 1 4 <> 0) 

OR ( s $ $ FCTCOL_0 1 5 <> 0) 

OR ( s $ $ FCTCOL_0 1 6 <> 0) 

OR ( s $ $ FCTCOL_0 1 7 <> 0) 

OR ( s $ $ FCTCOL_0 1 8 <> 0) 

OR ( s $ $ FCTCOL_0 1 9 <> 0) 

OR ( s $ $ FCTCOL_02 0 <> 0) 

OR ( s $ $ FCTCOL_0 2 1 <> 0) 

OR (s$$FCTCOL_022 <> 0) 

OR ( s $ $ FCTCOL_0 2 3 <> 0) 

OR ( s $ $ FCTCOL_0 2 4 <> 0) 

) 


— #BLOCK END# MakeILM 
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— Insert BOOKS for deltas with different dim keys 

— When a dimension key changes then we can simply insert all the new facts with the 

— new dimension keys 

— Note that seq - 1 here because this is the second transaction on this date for 

— this order. 

— IRM: Insert Rebook More 


y***********************************************************************************/ 
—# BLOCK BEGIN# MakeIRM 


$ $ SELECT_I NTO_BEGIN [ $ $ FCTTBL [ ] _IRM] 
SELECT 

tiss iss, 
tss_key ss_key, 
tdate_key date_key, 
ttranstype_key transtype_key, 
1 seq 

, t$$DIMKEYR_01 $$DIMKEYR_01 

, t$$DIMKEYR_02 $$DIMKEYR_02 

, t$$DIMKEYR_03 $$DIMKEYR_03 

, t$$DIMKEYR_04 $$DIMKEYR_04 

, t$$DIMKEYR_05 $$DIMKEYR_05 

, t$$DIMKEYR_06 $$DIMKEYR_06 

, t$$DIMKEYR_07 $$DIMKEYR_07 

, t$$DIMKEYR_08 $$DIMKEYR_08 

, t$$DIMKEYR_09 $$DIMKEYR_09 

, t$$DIMKEYR_10 $ $ DIMKEYR_1 0 

, t $ $ DEGKE Y_0 1 $$ DEGKE Y_01 

, t $ $ DEGKE Y_0 2 $$DEGKEY_02 

, t$$DEGKEY 03 $$ DEGKE Y 03 


t $ $ FCTCOL_0 0 1 
t$$FCTCOL_002 
t $ $ FCTCOL_0 0 3 
t$$FCTCOL_004 
t $ $ FCTCOL_0 0 5 
t $ $ FCTCOL_0 0 6 
t $ $ FCTCOL_0 0 7 
t$$FCTCOL_008 
t$$FCTCOL_009 
t$$FCTCOL_010 
t$$FCTCOL_011 
t $ $ FCTCOL_0 1 2 
t $ $ FCTCOL_0 1 3 
t $ $ FCTCOL_0 1 4 
t $ $ FCTCOL_0 1 5 
t $ $ FCTCOL_0 1 6 
t$$FCTCOL_017 
t$$FCTCOL_018 
t $ $ FCTCOL_0 1 9 
t $ $ FCTCOL_0 2 0 
t $ $ FCTCOL_0 2 1 
t $ $ FCTCOL_0 2 2 
t $ $ FCTCOL_0 2 3 
t$$FCTCOL 024 


$ $ FCTCOL_0 0 1 
$ $ FCTCOL_0 0 2 
$ $ FCTCOL_0 0 3 
$ $ FCTCOL_0 0 4 
$ $ FCTCOL_0 0 5 
$ $ FCTCOL_0 0 6 
$ $ FCTCOL_0 0 7 
$ $ FCTCOL_0 0 8 
$ $ FCTCOL_0 0 9 
$ $ FCTCOL_0 1 0 
$ $ FCTCOL_0 1 1 
$ $ FCTCOL_0 1 2 
$ $ FCTCOL_0 1 3 
$ $ FCTCOL_0 1 4 
$ $ FCTCOL_0 1 5 
$ $ FCTCOL_0 1 6 
$ $ FCTCOL_0 1 7 
$ $ FCTCOL_0 1 8 
$ $ FCTCOL_0 1 9 
$ $ FCTCOL_02 0 
$$FCTCOL_021 
$$FCTCOL_022 
$ $ FCTCOL_02 3 
$$FCTCOL 024 


$ $ SELECT_INTO_BODY [ $$ FCTTBL [ ] _IRM] 

FROM 

$$ FCTTBL []_NFD d 

WHERE 

( 

( s$$DIMKEYR_06 <> t $ $ DIMKEYR_0 6 ) OR 
(s$$DIMKEYR_05 <> t$$DIMKEYR_05) OR 
(S$$DIMKEYR_07 <> t$$DIMKEYR_07) OR 
( S$$DIMKEYR_04 <> t$$DIMKEYR_04 ) OR 
( s$$DIMKEYR 08 <> t$$DIMKEYR 08) OR 
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(S$$DIMKEYR 03 

<> 

t$$DIMKEYR 03) OR 


(s$$DIMKEYR 09 

<> 

t$$DIMKEYR 09) OR 


(S$$DIMKEYR 02 

<> 

t$$DIMKEYR 02) OR 


(s$$DIMKEYR 10 

<> 

t$$DIMKEYR 10) OR 


(s$$DIMKEYR_01 

<> 

t$$DIMKEYR_01) 

AND 

) 

( 

( t$$FCTCOL 001 

<> 

0) 

OR 

(t$$FCTCOL 002 

<> 

0) 

OR 

( t$$FCTCOL 003 

<> 

0) 

OR 

( t$$FCTCOL 004 

<> 

0) 

OR 

( t$$FCTCOL 005 

<> 

0) 

OR 

( t$$FCTCOL 006 

<> 

0) 

OR 

(t$$FCTCOL 007 

<> 

0) 

OR 

( t$$FCTCOL 008 

<> 

0) 

OR 

( t$$FCTCOL 009 

<> 

0) 

OR 

(t$$FCTCOL 010 

<> 

0) 

OR 

( t$$FCTCOL 011 

<> 

0) 

OR 

{ t$$FCTCOL 012 

<> 

0) 

OR 

(t$$FCTCOL 013 

<> 

0) 

OR 

( t$$FCTCOL 014 

<> 

0) 

OR 

( t$$FCTCOL 015 

<> 

0) 

OR 

( t$$FCTCOL 016 

<> 

0) 

OR 

( t$$FCTCOL 017 

<> 

0) 

OR 

( t$$FCTCOL 018 

<> 

0) 

OR 

( t$$FCTCOL 019 

<> 

0) 

OR 

( t$$FCTCOL 020 

<> 

0) 

OR 

( t$$FCTCOL 021 

<> 

0) 

OR 

( t$$FCTCOL 022 

<> 

0) 

OR 

( t$$FCTCOL 023 

<> 

0) 

OR 

( t$$FCTCOL 024 
) 

<> 

0) 

— #BLOCK_END# MakeIRM 



— Delete the output tables 

— #BLOCK_BEGIN# DropOutput 

$$DDL 

BEGIN 



$ $ DROP 

TABLE IF EXISTS [ $$FCTTBL [ ] 33NEXT] 

$$DROP 

TABLE IF EXISTS [$$FCTTBL[] INC] 

$$DDL 

END 



— #BLOCK_END# DropOutput 


/***********************************************************************************/ 

--Create FC table in case 

force close was 

-- not 

run 



/***********************************************************************************/ 

— #BLOCK_BEGIN# MakeFC 



DECLARE $$VAR[ fc_exists] 

$$EPIINT$$EOS 

$ $ DDL_ 

BEGIN_NO_DECLARE 



$$VAR ASSIGN BEGIN [fc 

exists] 

SELECT 

COUNT (1) 



$$VAR ASSIGN INTO [ f c exists] 

FROM $$SQLSERVER [ s y sob j ect s ] $$ ORACLE [ tabs ] 

WHERE 




| $$ SQLSERVER [id = object id ( * dbo . $ $ FCTTBL [ ] FC') AND sysstat & Oxf = 3] 

$$ORACLE[ table name = 

UPPER ('$$ FCTTBL [] FC 1 ) ] 

$ $ VAR_AS S I GN_END 



$$IF [$$VAR [ fc exists] 

- 0] 

$$ DDL 

EXEC [ 


i 
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$ $ SELECT_INTO_BEGIN [ $ $ FCTTBL [ ] _FC ] 

SELECT 

* 

$ $ SELECT_INTO_BODY [ $ $ FCTTBL [ ] _FC ] 

FROM 

$$ FCTTBL [ ] $$CURR 

WHERE 

1=0 

] 

$ $ END_I F 
$$DDL_END 

— #BLOCK_END# MakeFC 

/**★***★*+***★**★*★+*★****★** ********************************** *****★★*★**★******+★★/ 

— Create the incremental table 

y************-*********************************************************************-**/ 

— #BLOCK_BEGIN# . MakeINC 

$ $ SELECT_I NTO_BEGIN [ $ $ FCTTBL [ ] _INC ] 

SELECT 

* 

$$SELECT_INTO_BODY[$$FCTTBL[]_INC] 

FROM $$ FCTTBL [ ] _TIN UNION ALL 

SELECT * FROM $$ FCTTBL [ ] I L UNION ALL 

SELECT * FROM $$FCTTBL [ ] _IR UNION ALL 
SELECT * FROM $$ FCTTBL [] _IRD UNION ALL 
SELECT * FROM $$FCTTBL [ ] _IND UNION ALL 
SELECT * FROM $$ FCTTBL [ ]_IRM UNION ALL 
SELECT * FROM $$ FCTTBL [ ]_ILM UNION ALL 
SELECT * FROM $$FCTTBL[]_FC UNION ALL 
SELECT * FROM $$ FCTTBL []_I DM 

— #BLOCK_END# MakeINC 

/***************************** ******* ***********************************************/ 

— CR158: We want to load _IMI table and still keep the non-descending 

— order so that the clustered index on a fact table can be created 

— without sorting. This way can speed up significantly in creating a 

— clustered index on a very large already sorted fact table. 

/* + + * + *★★*★**★****★****★**★**** *** + *********************************** *****★★*★*★***/ 

— #BLOCK_BEGIN# MakelMI 

$ $ SELECT_INTO_BEGI N [ $ $ FCTTBL [ ] _IMI ] 

SELECT 

* 

$ $ SELECT_INTO_BODY [ $ $ FCTTBL [ ] _IMI ] 

FROM $ $ FCTTBL [ ] $ $CURR 

WHERE datejcey >= (SELECT MIN (date_key) FROM $$ FCTTBL [ ]_INC) 

UNION ALL 

SELECT * FROM $$ FCTTBL [] _INC 
$$ SQLSERVER t ORDER BY 
date_key 

, $$DIMKEYR_01 

, $$DIMKEYR_02 

, $ $ DI MKE YR_0 3 

, $ $ DIMKEYR_0 4 

# $ $ DIMKEYR_0 5 

, $$DIMKEYR_06 

, $$DIMKEYR_07 

, $$DIMKEYR_08 

, ' $$DIMKEYR_09 

, $ $ DIMKEYR_1 0 

] 

— #BLOCK_END# MakelMI 

/a-************************* + **★***★★★***★** *****************************************/ 

— Create the new fact table and incremental table 
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— Note that transaction tables must be built before 

— these statements are run 

/**★** ********************************************************* + ** + *****************/ 

— #BLOCK_BEGIN# MakeNewFact 

$ $ S ELECT_INTO_BEGIN [ $ $ FCTTBL [ ] $ $NEXT ] 

SELECT * 

$ $ SELECT_INTO_BODY [ $ $ FCTTBL [ ] $ $NEXT ] 

FROM $$ FCTTBL []$$CURR s 

WHERE s.datejcey < (SELECT MIN (datejcey) FROM $$ FCTTBL [] _INC) 

UNION ALL 

SELECT * FROM $$ FCTTBL [ ]_IMI 
— #BLOCK_END# MakeNewFact 

/★*★★******★* *********************************** ************************* ***★*★***★*/ 

— Count processed, inserted rows 

^★******************+*************************+*+**********-*************************/ 

— #BLOCK_BEGIN# SPResults 

DECLARE $ $ VAR [ count_INC ] $$EPIINT$$EOS 

BEGIN 

$$VAR_ASSIGN_BEGIN[count_INC] 

SELECT COUNT (1) 

$ $ VAR_ASS I GN_INTO [ coun t_I NC ] 

FROM $ $ FCTTBL [ ] _INC 
$$VAR_ASSIGN_END 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'PROCESSED', COUNT (1) FROM $$ FCTTBL [] _MFL$$ EOS 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'INSERTED', $$VAR[count_INC] - COUNT(l) FROM $$ FCTTBL [ ]_TIN$$EOS 

END$$EOS 

— #BLOCK_END# SPResults 

/★**★★★+*★*★++****★**+★***★**+★*****★**********★*++*+★**★**********/ 

-- Set join order for SQL Server 

/******************* **************************** **★**•**★★***★****★*/ 

— #BLOCK_BEGIN# ForcePlanOff 
$$ SQLSERVER [SET FORCEPLAN OFF] 

— #BLOCK_END# ForcePlanOff 

/***********************************************************************************/ 

— Drop temp tables and TXN and TIN table 

^****+***********************+*******************+***************+****+*************/ 

— #BLOCK_BEGIN# DropTempsAfter 

$$DDL_BEGIN 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL [ ] _T IN ] 

$ $ DROP_TABLE_I F_EXISTS [ $ $ FCTTBL [ ] _TMI ] 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL [ ] _FC ] 

$ $ DROP _T ABLE_I F_EXI STS [ $ $ FCTTBL [ ] _TXN ] 

$$DROP_TABLE_IF_EXISTS[Concat_MFL] 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL [ ] _1ST } 

$ $ DROP _TABLE_I F_EX I STS [ $ $ FCTTBL [ ] _IL ] 

$ $DROP_TABLE_I F_EX I STS [$$ FCTTBL [ ]_IR] 

$$DROP_TABLE_IF_EXISTS [$$FCTTBL [ ]_IRD] 

$$DROP_TABLE_IF_EXISTS [$$FCTTBL [ ]_IND] 

$$DROP TABLE IF EXISTS [ $$FCTTBL [ ] NFD] 
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$ $ DROP _T AB LE_I F_EX I STS [ $ $ FCTTBL [ ] _I RM ] 

$$DROP_TABLE_IF_EXISTS [$$FCTTBL ( ]_IDM] 

$ $ DROP_T ABLE_I F_EX ISTS[$$FCTTBL(]_ILM] 

$ $ D RO P_T AB L E_I F_EX I STS [ $ $ FCTTBL ( ] _IMI ] 

$$DDL_END 

--#BLOCK_END# DropTempsAf ter 

--#TEMPLATE_END# load_State 
— # T EM P L AT E_B EG IN# load_trans 

y*********************************************************************************y 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— load_trans 

— Move transaction-like staging data into Fact table - create a temp 

— table with TXN extension that has all old rows along with new rows. 

— Also produce a TIN (TXN INC) table that has only the new rows 

— Note that the new table will also include all existing rows from 

— the Fact table. 

y*********************************************************************************y 

y*********************************************************************************y 
-- Delete output tables 

— Output table is called TXN and includes old and new rows 

— Also, leave around _TIN as incremental table from this 

— procedure 

— We also create a table called _TMI which contains all the 

— _TIN records plus the records of overlapping period from the 

— old existing fact table. 

y*************************** *************************** *************************** y 

— #BLOCK_BEGIN# RemoveOutput 

$$DDL_BEGIN 

$ $ DROP_TABLE_I F_EXI STS ( $ $ FCTTBL [)_TXN] 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL ( ] _TMI ] 

$ $ DROP_TABLE__I F_EXI STS [ $ $ FCTTBL [ ] _T I N ] 

$$DDL_END 

— # BLOC K_EN D # RemoveOutput 

y******************************************************************y 

— Set join order for SQL Server 

y****************************************************** ************ y 
— #BLOCK_BEGIN# ForcePlanOn 
$$ SQLSERVER (SET FORCEPLAN ON] 

— # BLOCK_END# ForcePlanOn 

y **************************************************************** ***************** y 

— Remove stuff already in fact table 

— Note that currently this filter implies that once a transactional 

— fact entry is made it cannot be changed - and no further fact 

— entries on that date or any previous date can be made either 

y****************************************************** *************************** y 
— #BLOCK_BEGIN# CreateTIN 
$ $ SELECT_INTO_BEGIN [ $ $ FCTTBL [ ] _T IN ] 

SELECT ____ 
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t 

s .iss, 
s . ss_key, 
s .date_key, 
s . transtype_key, 
s.ikey seq 
S . $$DIMKEYR 01 

t 

S . $$DIMKEYR 02 

t 

S . $$DIMKEYR 03 

t 

s . $$DIMKEYR 04 

/ 

s . $$DIMKEYR 05 

/ 

S . $$DIMKEYR 06 

» 

S . $$DIMKEYR 07 

t 

s.$$DIMKEYR 08 

/ 

S.$$DIMKEYR 09 

1 

S . $$DIMKEYR 10 

t 

S . $$DEGKEY 01 

t 

s.$$DEGKEY 02 

f 

S . $ $ DEGKE Y_0 3 

/ 

S . $$FCTCOL 001 

t 

S . $$FCTCOL 002 

t 

s . $$FCTCOL 003 

t 

s.$$FCTCOL 004 

/ 

s . $$FCTCOL 005 

t 

s.$$FCTCOL 006 

9 

S . $$FCTCOL 007 

t 

s.$$FCTCOL 008 

t 

s . $$FCTCOL 009 

t 

s.$$FCTCOL 010 

t 

s . $$FCTCOL Oil 

t 

s . $$FCTCOL 012 

t 

s.$$FCTCOL 013 

» 

s . $$FCTCOL 014 

i 

s . $$FCTCOL 015 

t 

s . $$FCTCOL 016 

# 

s.$$FCTCOL 017 

# 

s . $$FCTCOL 018 

/ 

s . $$FCTCOL 019 

/ 

s.$$FCTCOL 020 

t 

S . $ $FCTCOL 021 

/ 

s . $ $ FCTCOL 022 

f 

s . $$FCTCOL 023 

t 

S.$$ FCTCOL 024 

$$ SELECT INTO BODY [ $$FCTTBL [ ) TIN] 

FROM 

WHERE 

AND 

$ $ FSTGTBL [ ] _MAP s, bus_process b 

NOT EXISTS (SELECT * FROM $ $ FCTTBL [ ] $ $ CURR f WHERE 
s.iss = f.iss AND 
s.ss_key = f.ss_key AND 
f.date key >- s.date key) 

( 

OR 

( s . $$ FCTCOL 001 <> 0) 
(s . SSFCTCOL 002 <> 0) 

OR 

( S . $ $ FCTCOL 003 <> 0) 

OR 

(s . $$ FCTCOL 004 <> 0) 

OR 

( s . $ $ FCTCOL 005 <> 0) 

OR 

( s . $ $ FCTCOL 006 <> 0) 

OR 

(s . $$ FCTCOL 007 <> 0) 

OR 

(s. SSFCTCOL 008 <> 0) 

OR 

( S . $$ FCTCOL 009 <> 0) 

OR 

( s . $$FCTCOL 010 <> 0) 

OR 

(s. SSFCTCOL Oil <> 0) 

OR 

( s . $$FCTCOL 012 <> 0) 

OR 

(S. SSFCTCOL 013 <> 0) 

OR 

( S . $$ FCTCOL 014 <> 0) 

OR 

( s . $$FCTCOL 015 <> 0) 

OR 

(s. SSFCTCOL 016 <> 0) 

OR 

(s . $$ FCTCOL 017 <> 0) 

OR 

(s. SSFCTCOL 018 <> 0) 
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OR ( s . $ $ FCTCOL_0 1 9 <> 0) 

OR ( s . $ $ FCTCOL__02 0 <> 0) 

OR { s . $ $ FCTCOL_0 2 1 <> 0) 

OR ( s . $ $ FCTCOL_0 2 2 <> 0) 

OR ( s . $ $ FCTCOL_0 2 3 <> 0) 

OR ( s . $ $ FCTCOL_0 2 4 <> 0) 

) 

AND 

s .process_key = b ,process_key AND b.process_name = ' LoadTrans* 

— #BLOCK_END# CreateTIN 

/a-*****************************************************************/ 

— Set join order for SQL Server 

/★******★*★★*********+**+****★*+★★+* ****★**★***+****★*★+***★**★*★*+/ 

--#BLOCK_BEGIN# ForcePlanOff 
$$ SQLSERVER [SET FORCEPLAN OFF] 

— #BLOCK_END# ForcePlanOff 

/★****★****•*■**★*****★* + ★* ****** ********************** ************** ***************/ 

— CR158 : We want to load _TMI table and still keep the non-descending 

— order so that the clustered index on a fact table can be created 

— without sorting. This way can speed up significantly in creating a 

— clustered index on a very large already sorted fact table. 

/★★*****★ + ★** + ***★**★*★******* ****************************************************/ 

— #BL0CK_BEG1N# CreateTMI 

$ $ SELECT_INTO_BEGI N [ $ $ FCTTBL [ ] _TMI ] 

SELECT 

* 

$$SELECT_INTO_BODY [ $$ FCTTBL [ ]_TMI ] 

FROM 

$ $ FCTTBL [ ] $ $ CURR 

WHERE 

datejcey >= (SELECT MAX (date_key) FROM $$ FCTTBL [ ]_TIN) 

UNION ALL 
SELECT 

* 

FROM 

$$FCTTBL[] _TIN 
$$SQLSERVER [ORDER BY 
date_key 

, $ $ DIMKEYR_0 1 

, $ $ DIMKEYR_02 

, $ $ D I MKE YR_0 3 

, $$DIMKEYR_04 

, $ $ DIMKEYR_0 5 

, $ $ DIMKEYR_0 6 

, $$DIMKEYR_07 

, $$DIMKEYR_08 

, $ $ DIMKEYR_0 9 

, $ $ DIMKEYR_1 0 


— # BLOCK_END# CreateTMI 

^* , *-*****'*** , * , ********'********-***********'*-* , *******ir**+* , * , ** + + **-* , *** + * + ****** , * , + **** , *' , *- + * j 

— Insert everything into the new fact table 

+ + + j 

— #BLOCK_BEGIN# CreateTXN 

$$SELECT_INTO_BEGIN [$$FCTTBL [ ]_TXN] 

SELECT 

★ 

$ $ SELECT_INTO_BODY [ $ $ FCTTBL [ ] _TXN ] 

FROM 
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$ $ FCTTBL [ ] $ $CURR s 

WHERE s . date_key < (SELECT MAX (date_key) FROM $$ FCTTBL (]_TIN) 

UNION ALL 
SELECT 

* 

FROM 

$$ FCTTBL []_TMI f 
— #BLOCK_END# CreateTXN 

/*********************************************************************************/ 

— Count inserted data and put results into communication table 
/*********************************************************************************/ 

— #BLOCK_BEGIN# SPResults 

BEGIN 

INSERT INTO adapt ive_template_prof ile (token_name, number_rows) 

SELECT ' PROCESSED ' , COUNT(l) FROM $ $ FSTGTBL ( ] _MAP$ $ EOS 

INSERT INTO adaptive^emplate^rof ile (token_name, number_rows) 

SELECT 'INSERTED', COUNT(l) FROM $$FCTTBL ( ]_TIN$$EOS 

END$$EOS 

--#BLOCK_END# SPResults 
— #TEMPLATE_END# load_trans 
— #TEMPLATE_BEGIN# index_fact 

/*************************************************************************************/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— Post processing after an extraction run 

— Reindex fact tables 

— CR158: added WITH SORTED_DATA in creating cluster index on fact table 

— Remove any temp tables generated during the extraction 
^*************************************************************************************/ 

y*************************************************************************************y 

— Primary key index the fact table 

/*************************************************************************************/ 

— #BLOCK_BEGIN# PKIndexFact 

$$DDL_BEGIN 

$$DDL_EXEC[ 

CREATE UNIQUE INDEX XPK$$ FCTTBL [] $$NEXT ON $ $ FCTTBL ( ] $ $ NEXT 

( 

iss , ss_key , date_key , transtype_key , seq 

) 

] 

$$DDL_END 

— #BLOCK_END# PKIndexFact 

/*************************************************************************************/ 

— Inversion index the fact table 

/*************************************************************************************/ 

— #BLOCK_BEGIN# IEIndexFact 

$$DDL_BEGIN 

$$DDL EXEC [ 
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CREATE $$ SQLSERVER [CLUSTERED ] INDEX XIEK$$FCTTBL [ ] $$NEXT ON $$FCTTBL [ ] $$NEXT 
( 

date_key 

, $$DIMKEYR_01 

, $$DIMKEYR_02 

, $$DIMKEYR_03 

, $$DIMKEYR_04 

, $$DIMKEYR_05 

, $$DIMKEYR_06 

, $$DIMKEYR_07 

, $$DIMKEYR_08 

, $ $ DIMKEYR_0 9 

, $$DIMKEYR_10 

) $$SQLSERVER [WITH SORT E D_DAT A ] 

] 

$$DDL_END 

— #BLOCK_END# IEIndexFact 

/*****■*■★ + **★ + *★****★**********★****■*■*★** + *★*★ + ****★★* *********************************/ 

— Remove any mapped tables 

y^************************************************************************************/ 

— #BLOCK_BEGIN# RemoveTemps 

$$DDL_BEGIN 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FSTGTBL [ ] _MAP ] 

$$DDL_END 

— #BLOCK_END# RemoveTemps 

— #TEMPLATE_END# index_fact 
— #TEMPLATE_BEGIN# ren_trans 

/* + **■★*****★* ************************************** ************ *********/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— ren_trans 

— Epiphany Marketing Software, 1997 

— Simply change the name of the transaction new table to the 

— actual fact table name - used for Fact tables that don't have 

— any stored procedure other than load_trans attached to them 

/************************************************** + ★*******•**★•*■*★*****★/ 

•y ***********************************************************************/ 

— Delete the output tables 

/★* + *•*********★★★**★ + ***•* + **•* ++*•****★***** ********************** *****+★*/ 

— #BLOCK_BEGIN# RemoveOutput 
$$DDL_BEGIN 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL [ ] $ $NEXT ) 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FCTTBL [ ] _INC ] 

$$DDL_END 

— #BLOCK_END# RemoveOutput 

/********★*************************************★************★** + ** ******/ 

— Move all transaction rows into the correct new fact table 

— name. Note that we would use sp_rename, except it 

— doesn't work with DB name prefixes 

— TBD: Rename instead of re-select 

/**********★**★***************** ****************************************y 
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— #BLOCK BEGIN# BuildNewFact 


$ $ SELECT_I NTO_BEGIN [ $ $ FCTTBL [ ] $ $ NEXT ] 

SELECT 

* 

$ $ SELECT_INTO_BODY [ $ $ FCTTBL [ ] $ $NEXT ] 

FROM 

$$ FCTTBL []_TXN 
— #BLOCK_END# BuildNewFact 

/*************** ************************************* + *** + ******* *******/ 
— Preserve incremental table 

/***★******★**+***★+★**★★*★*******★+*****************★***********■**★***★/ 

— #BLOCK_BEGIN# Buildlncremental 

$ $SELECT_INTO_BEGIN [ $ $ FCTTBL [ ] _INC ] 

SELECT 


$ $ SELECT_I NTO_BODY [ $ $ FCTTBL [ ] _INC ] 
FROM 

$$FCTTBL[]_TIN 




V 

5 

si 


!«: 


is*? 



— #BLOCK_END# Buildlncremental 

^*******************************+*+***************************+**+****+*y 
— Count inserted data and put results into communication table 
y***********************************************************************y 

— #BLOCK_BEGIN# SPResults 

BEGIN 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'PROCESSED 1 , COUNT ( 1 ) FROM $$ FCTTBL [ ] _TXN$$ EOS 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'INSERTED', COUNT(l) FROM $$ FCTTBL [] _TXN$$ EOS 

END$$EOS 

— #BLOCK END# SPResults 


— Remove temp tables 


— #BLOCK_BEGIN# RemoveTemps 
$$DDL_BEGIN 

$$DROP_TABLE_IF_EXISTS [$$FCTTBL [ ]_TXN] 
$ $ DROP_TABLE_I F_EXI STS [ $$ FCTTBL [ ] _TIN] 
$ $ DROP_TABLE__I F_EXI STS [ $$ FCTTBL [ 3 _TMI ] 
$$DDL_END 

— #BLOCK_END# RemoveTemps 
— #TEMPLATE_END# ren_trans 
— #TEMPLATE_BEGIN# map_keys 


/******★**•************** *******************************************/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— map_keys 

— Epiphany Marketing Software 
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— Map dimension keys from Staging table and report 

— on unjoined rows 


/**★***★★****★★*****★★★★ + *★ *****-************************ + **********/ 

y******************************************************************/ 

— Remove output table 

/***************** *****★**★********** + ** **■***★*■*■*★* *★*** + *★★★★****★/ 

— #BLOCK_BEGIN# DropTemp 

$$DDL_BEGIN 

$ $ DROP_TABLE_I F_EXI STS [ $ $ FSTGTBL [ ] _MAP ] 

$$DDL_END 

— #BLOCK_END# DropTemp 

/*************************************************************+****/ 

— Set join order for SQL Server 

/****+***********+*+***********************+***********************/ 
— #BLOCK_BEGIN# ForcePlanOn 
$$ SQLSERVER [SET FORCEPLAN ON] 

— #BLOCK_END# ForcePlanOn 

^*★★ + ★★★*'**★★'^r + ********★* , ***★★★★****★★★★★*★★★★★★*+*★★** , *+★★★★•* , ★★★*★ j 

— Map dimension keys via Inner joins 

/★** + ******★*******★*•**★★ + *****************************************/ 

— #BLOCK_BEGIN# MapAll 

$ $ SELECT_INTO_BEGI N [ $ $ FSTGTBL [ ] _MAP ] 

SELECT 


s . 1SS, 

s . ss_key, 
s . date_key, 
s . transtype_key, 
s . ikey, 
s .process_key 
$$PIPE STATE 


m_04 . $$DIMKEY_04 
m_03 . $$DIMKEY_03 
m_06.$$DIMKEY_06 
m_02.$$DIMKEY_02 
m_08.$$DIMKEY_08 
m_05.$$DIMKEY_05 
m_09 . $$DIMKEY_09 
m_01.$$DIMKEY_01 
m_07 . $$DIMKEY_07 
m 10 . $$DIMKEY 10 


$$DIMKEYR_04 
$ $ DXMKEYR_0 3 
$ $ DIMKEYR_0 6 
$$DIMKEYR_02 
$$DIMKEYR_08 
$$DIMKEYR_05 
$$DIMKEYR_09 
$$DIMKEYR_01 
$$DIMKEYR_07 
$$DIMKEYR 10 


$$DEGKEY_03 
$$DEGKEY_02 
$$DEGKEY 01 


s . $ $ FCTCOL_0 0 1 
s . $ $ FCTCOL_0 0 2 
s . $ $ FCTCOL_0 0 3 
s.$$FCTCOL_004 
s.$$FCTCOL_005 
s.$$FCTCOL_006 
S.$$FCTCOL_007 
S.$$FCTCOL_008 
s.$$FCTCOL_009 
s . $ $ FCTCOL_0 1 0 
s . $ $ FCTCOL_0 1 1 
S . $ $ FCTCOL_0 1 2 
s . $$FCTCOL 013 
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s . $ $ FCTCOL_0 1 4 
s . $ $ FCTCOL_0 1 5 
s . $ $ FCTCOL_0 1 6 
s.$$FCTCOL_017 
s.$$FCTCOL_018 
s . $ $ FCTCOL_0 1 9 
S . $ $ FCTCOL_02 0 
S.$$FCTCOL_021 
S.$$FCTCOL_022 
s . $ $ FCTCOL_02 3 
s.$$FCTCOL 024 


$ $ SELECT_INTO_BODY [ $ $ FSTGTBL [ ] _MAP ] 

FROM 

$$ FSTGTBL [] S 

, $$MAPTBL_04$$NEXT m_04 $$ SQLSERVER [ (index 

, $$MAPTBL_03$$NEXT m_03 $$SQLSERVER[ (index 

, $ $MAPTBL_0 6$ $NEXT m_06 $$SQLSERVER[ (index 

, $$MAPTBL_02$$NEXT m_02 $$ SQLSERVER [ (index 

, $$MAPTBL_08$$NEXT m_08 $$ SQLSERVER [ (index 

, . $$MAPTBL_05$$NEXT m_05 $$ SQLSERVER [ (index 

, $ $MAPTBL_0 9$ $NEXT m_09 $$ SQLSERVER [ (index 

, $$MAPTBL_01$$NEXT m_01 $$ SQLSERVER [ (index 

, $ $MAPTBL_0 7 $ $ NEXT m_07 $$ SQLSERVER [( index 

, $$MAPTBL 10$$NEXT m 10 $$ SQLSERVER! (index 


WHERE 1=1 


s.iss AND 
s.iss AND 
s.iss AND 
s.iss AND 
s.iss AND 
s.iss AND 
s.iss AND 
s.iss AND 
s.iss AND 
s.iss AND 


. $ $ DSTGKE Y_0 4 = s 
.$$DSTGKEY_03 = s 
. $ $ DSTGKEY_0 6 = s 
. $$DSTGKEY_02 = S 
. $ $ DSTGKE Y_0 8 = s 
. $ $ DSTGKEY_05 = s 
. $ $ DSTGKEY_0 9 = S 
. $$DSTGKEY_01 = s 
. $ $ DSTGKEY_07 = s 
. $$DSTGKEY 10 = s 


, $ $ DSTGKEYR_0 4 
$$ DSTGKE YR_0 3 
$$ DSTGKE YR_0 6 
$$ DSTGKE YR_02 
$$ DSTGKE YR_0 8 
$ $ DSTGKE YR_0 5 
$$ DSTGKE YR_0 9 
$$ DSTGKE YR_01 
$$ DSTGKE YR_0 7 
$$ DSTGKE YR 10 


— #BLOCK_END# MapAll 

/**+*************************** *****★**★★****★★*★***★★ *★****★***★★*/ 

— Set join order for SQL Server 

/★★a-*********************************** ************* *******•*★★★**★*/ 
— #BLOCK_BEGIN# ForcePlanOff 
$$ SQLSERVER [ SET FORCEPLAN OFF] 

— #BLOCK_END# ForcePlanOff 

/******************************************************************/ 

— Look for unjoined data, Report on processed rows 
/*********★*★**★*****★******★****★★★+*★★**★*★**★*★★★★**★*****★****+/ 

— #BLOCK_BEGIN# SPResults 

$$DECLARE_BEGIN 

$ $ DECLARE_BOD Y [ $ $ VAR [unjoined] $$EPIINT] 

$$DECLARE_BODY [$$VAR(processed] $$EPIINT] 


$$VAR_ASSIGN_BEGIN [processed] 
SELECT COUNT (1) 

$$VAR_ASSIGN_INTO [processed] 

FROM $$FSTGTBL [ ] 

$$VAR_ASSIGN_END 

$$VAR_ASSIGN_BEGIN [unjoined] 

SELECT $$VAR[ processed] * COUNT (1) 
$$VAR ASSIGN INTO [unjoined] 
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FROM $ $ FSTGTBL [ ] _MAP 
$ $ VAR_AS S I GN_EN D 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'UNJOINED', $$VAR [unjoined] $$NO_FROM_LIST$$EOS 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'PROCESSED', $$VAR[processed] $$NO_FROM_LIST$$EOS 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'INSERTED', $$VAR[processed] - $$VAR [unjoined] $$NO_FROM_LIST$$EOS 

END$$EOS 

— #BLOCK_END# SPResultS 

/******************************************************************/ 

— Index this temp table 

/**********★******★*★************************ **★★*■★★★★ + ★ + **★**★*★**/ 

— #BLOCK_BEGIN# IndexMap 

$$DDL_BEGIN 
$ $ DDL_EXEC [ 

CREATE INDEX X$ $ FSTGTBL [] _MAP ON $$ FSTGTBL [] _MAP 

( 

iss, ss_key, date_key, ikey 

) 

3 

$$DDL_END 

— #BLOCK_END# IndexMap 

— # TEMPLATE_END# map_keys 
— #TEMPLATE_BEGIN# upd_unj 


— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved 

— upd_unj 

— Epiphany Marketing Software 

— Update all dimension keys to 'UNKNOWN' in staging table 

— where referential integrity fails 

> 

/*********************************************** **************** *★*** + / 

— Count the number of rows to update in the staging table - that is, those 

— that have at least one Foreign key where referential integrity fails 
/***********************************+******************** *************/ 

— #BLOCK_BEGIN# CountUnj 

BEGIN 


INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'PROCESSED', COUNT(l) FROM $$ FSTGTBL []$$ EOS 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'MODIFIED', COUNT (1) 

FROM 

$$ FSTGTBL [ ] S 
WHERE 1=0 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_04$$NEXT m_04 WHERE m_04.iss = s.iss AND 
m_04.$$DSTGKEY_04 = $$DSTGKEYR_04 ) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_03$$NEXT m_03 WHERE m_03.iss = s.iss AND 
m_03 . $$DSTGKEY_03 = $ $ DSTGKE YR_0 3 ) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL 06$$NEXT m 06 WHERE m 06. iss = s.iss AND 
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m_06.$$DSTGKEY_06 = $ $ DSTGKEYR_0 6 ) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_02$$NEXT m_02 WHERE m_02.iss - s.iss AND 
m_02.$$DSTGKEY_02 = $$DSTGKEYR_02 ) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_08$$NEXT m_08 WHERE m_08.iss = s.iss AND 
m_08 . $$DSTGKEY_08 = $$DSTGKEYR_08 ) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_05$$NEXT m_05 WHERE m_05.iss « s.iss AND 
m_05.$$DSTGKEY_05 - $$ DSTGKE YR_0 5 ) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_09$$NEXT m_09 WHERE m_09.iss = s.iss AND 
m_0 9 . $ $ DSTGKEY_0 9 = $$ DSTGKE YR_0 9) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_01$$NEXT m_01 WHERE m_01 . iss = s.iss AND 
m_0 1 . $ $ DSTGKE Y_0 1 =* $$DSTGKEYR_01 ) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_07$$NEXT m__07 WHERE m_07.iss = s.iss AND 
m_07.$$DSTGKEY_07 = $$ DSTGKE YR_0 7 ) 

OR NOT EXISTS (SELECT 1 FROM $$MAPTBL_10$$NEXT m_10 WHERE m_10.iss = s.iss AND 
m_10.$$DSTGKEY_10 =* $ $ DSTGKEYR_1 0 ) 

$$EOS 

END$$EOS 

— #BLOCK_END# CountUnj 

^******-****************************** + ******** + ***********************^ 

— Update foreign keys where referential integrity fails 
/****************************************************** ****★★*★* + *■****/ 

— #BLOCK_BEGIN# UpdateUn j $$DSTGKEYR_0 4 

UPDATE $$FSTGTBL [ ] SET $ $ DSTGKEYR_0 4 = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_04$$NEXT m 

WHERE m. iss = $$FSTGTBL [ ] . iss AND m. $$ DSTGKE Y_0 4 = $$FSTGTBL [ ] . $$DSTGKEYR_04 ) 

— #BLOCK_END# Upda teUn j $ $ DSTGKEYR_0 4 

--#BLOCK_BEGIN# UpdateUn j $ $ DSTGKE YR_0 3 

UPDATE $$FSTGTBL ( ] SET $ $ DSTGKE YR_0 3 = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_03$$NEXT m 

WHERE m. iss = $$FSTGTBL [ ] . iss AND m. $$DSTGKEY_03 = $$FSTGTBL [ ] . $$ DSTGKE YR_03) 


— #BLOCK_END# UpdateUnj$$DSTGKEYR_03 

— #BLOCK_BEGIN# UpdateUn j $$DSTGKEYR_06 

UPDATE $$FSTGTBL ( ] SET $ $ DSTGKEYR_0 6 = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_06$$NEXT m 

WHERE m. iss = $$FSTGTBL [ ] . iss AND m. $$ DSTGKE Y_0 6 = $$FSTGTBL [ ] . $$ DSTGKE YR_0 6) 

— # BLOCK_END# Upda t eUn j $ $ DSTGKE YR_0 6 

— #BLOCK_BEGIN# UpdateUn j $ $ DSTGKE YR_0 2 

UPDATE $$FSTGTBL [ ] SET $$DSTGKEYR_02 = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_02$$NEXT m 

WHERE m.iss = $$FSTGTBL ( ] . iss AND m. $$ DSTGKE Y_0 2 = $$FSTGTBL[] . $$DSTGKEYR_02 ) 


— # BLOC K_EN D # UpdateUn j $ $ DSTGKEYR_02 


— #BLOCK_BEGIN# UpdateUn j $$DSTGKEYR_08 

UPDATE $$FSTGTBL [ ] SET $$ DSTGKE YR_0 8 =* 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_08$$NEXT m 

WHERE m.iss = $$FSTGTBL[] .iss AND m. $$ DSTGKE Y_0 8 = $$FSTGTBL[] . $$DSTGKEYR_08 ) 


— #BLOCK_END# UpdateUn j $$DSTGKEYR_08 

— # BLOCK_BEGIN# UpdateUn j $ $ DSTGKE YR_0 5 

UPDATE $$FSTGTBL [ ] SET $$DSTGKEYR_05 = 'UNKNOWN* 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_05$$NEXT m 

WHERE m.iss = $$FSTGTBL [ ] . iss AND m. $$ DSTGKE Y_0 5 = $$FSTGTBL[] . $$DSTGKEYR_05 ) 


--#BLOCK END# UpdateUn*) $ $ DSTGKEYR 05 
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— #BLOCK_BEGIN# UpdateUn j $$DSTGKEYR_09 

UPDATE $$FSTGTBL [ ] SET $$DSTGKEYR_09 = * UNKNOWN ' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_09$$NEXT m 

WHERE m.iss - $$FSTGTBL ( ] . iss AND m. $$DSTGKEY_09 « $$FSTGTBL [ ] . $$DSTGKEYR_09) 

— #BLOCK_END# UpdateUnj $$DSTGKEYR_09 

— #BLOCK_BEGIN# UpdateUnj $$DSTGKEYR_01 

UPDATE $$FSTGTBL [ ] SET $ $ DSTGKEYR_0 1 = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_01$$NEXT m 

WHERE m.iss = $$FSTGTBL [ ] . iss AND m. $$ DSTGKE Y_01 = $$FSTGTBL [] . $$DSTGKEYR_01 ) 

— #BLOCK_END# UpdateUnj $$DSTGKEYR_01 

— #BLOCK_BEGIN# UpdateUn j $$DSTGKEYR_07 

UPDATE $$FSTGTBL ( ] SET $ $ DSTGKE YR_0 7 - 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_07$$NEXT m 

WHERE m.iss = $$FSTGTBL [ ] . iss AND m. $$ DSTGKE Y_0 7 = $$FSTGTBL [ ] . $$ DSTGKE YR_0 7) 

— #BLOCK_END# UpdateUnj $$DSTGKEYR_07 

— # BLOCK_BEGI N # UpdateUnj $$DSTGKEYR_10 

UPDATE $$FSTGTBL [ ] SET $ $ DSTGKEYR_1 0 = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM $$MAPTBL_10$$NEXT m 

WHERE m.iss = $$FSTGTBL [ ] . iss AND m. $$DSTGKEY_10 « $ $ FSTGTBL [ ] . $ $ DSTGKEYR_1 0 ) 
--#BLOCK_END# UpdateUnj $$DSTGKEYR_10 


— #TEMPLATE_END# upd_unj 


The following are the post-parsed SQL source for the adaptive templates as filled in with % 
corresponding schema definitions. 


— #TEMPLATE_BEGIN# force_close 

/****************** ****************************************** *********** ***********/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— force_close 

— Close out deleted orders - those that no longer appear in the 

— staging table 

— SEE SAFETY VALVE BELOW 

/***************************************************************************** *★***/ 

/★*★*★***** ************************************************************* *★★ + + ******/ 

— Delete temporary tables 
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--#BLOCK_BEGIN# DropTemps 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( ' dbo.Order_0_FC ' ) AND sysstat & Oxf = 
3) DROP TABLE Order_0_FC 


— #BLOCK_END# DropTemps 

/****★+**★★•**★****★★★★**+*********★**★★★+*★*★★**++*****★**★+*★*★****★***+*+******★★/ 

— Insert negative BOOKS for deleted orders 

— FC: ForceClose 

y********************************************************************"********-******/ 
— #BLOCK BEGIN# MakeFC 


n 

M 

y 

M 




:U f 

SD 


SELECT 

f.iss, 
f . ss_key, 

MAX ( f . date_key ) date_key, 

MIN ( f . transtype_key ) transtype_key , 

MAX ( f . seq) + 1 seq 
, f .customerbillto_key 

, f .product_key 

, f .application_key 

, f ,program_key 

, f .customershipto_key 

, f . territory_key 

, f . warehouse_key 

, -SUM { f . net_price ) net_price 

, -SUM ( f . number__units ) number_units 

INTO Order_0_FC 
FROM 

Order_0_A f 

WHERE 

NOT EXISTS 

(SELECT 1 FROM OrderStage_MAP s WHERE s.iss = f.iss AND s.ss_key = f.ss_key) 

GROUP BY 

f.iss, 
f . ss_key 

, f ,customerbillto_key 

, f ,product_key 

, f ,application_key 

, f .program_key 

, f ,customershipto_key 

, f . territory_key 

, f .warehouse_key 

HAVING 

( 

( SUM ( f . net_price ) <> 0) 

OR (SUM ( f . number_units ) <> 0) 

) 

AND 

MIN ( f . transtype_key ) <= 99 

AND 

MIN ( f . transtype_key ) >= 1 
— #BLOCK_END# MakeFC 

y**********************************************************************************/ 
— SAFETY VALVE - THIS PROC ONLY DOES ANYTHING 
—IF THE STAGING TABLE HAS AT LEAST ONE ROW 

y**********************************************************************************y 
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— #BLOCK_BEGIN# SafetyValue 
DECLARE @C 0 unt_MAP INT 
BEGIN 

SELECT @count_MAP = ( 

SELECT COUNT (1) 

FROM OrderStage_MAP 

) 

IF ( (@count_MAP = 0)) 

DELETE FROM Order 0 FC 


END 

— #BLOCK_END# SafetyValue 

/**********************************************************************************/ 
— Count processed, inserted rows 

/**********************************************************************************/ 

— #BLOCK_BEGIN# SPResultS 

BEGIN 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT ' PROCESSED' , COUNT (1) FROM Order_0__A 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'INSERTED', COUNT (1) FROM Order_0_FC 

END 

— #BLOCK_END# SPResults 
— # TEMPLATE END# force close 


— #TEMPLATE_BEGIN # load_state 

^****** + ****************** + ************************* + ***** + * + **#**** + *** , * , * ,, * ,, * , ** , + ***** f 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— load_state 

— Load order bookings into fact table by creating transactional 

— data from state data 

— load_trans must be run before this procedure to create TIN table 
/************************************************************************** **★*★*★**/ 

/************************ ***********************************************************/ 

— Delete temporary tables 

/********************************************************************** *************/ 
— #BLOCK_BEGIN# DropTemps 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( ' dbo ,Order_0_MFL ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order_0_MFL 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( ' dbo .Order_0_lST ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order_0_lST 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id( ' dbo . Order_0_IL ' ) AND sysstat & Oxf = 
3) DROP TABLE Order_0_IL 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id( 'dbo.Order_0_IR' ) AND sysstat & Oxf = 
3) DROP TABLE Order 0 IR 
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IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( * dbo . Order_0_IRD ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order_0_IRD 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( ’ dbo . Order_0_IND ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order_0_IND 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = obj ect_id ( ’ dbo . Order_0_NFD ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order_0_NFD 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( ' dbo . Order_0_IRM ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order_0_IRM 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = obj ect_id ( ' dbo . Order_0_IDM ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order_0_IDM 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = obj ect_id ( ' dbo . Order_0_ILM ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order_0_ILM 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( ' dbo . Order_0_IMI ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order 0 IMI 


— #BLOCK_END# DropTemps 

/******************************************************************y 

— Set join order for SQL Server 

/★★★**********★★*★*★***********+****■**★★**********-***•*■**★★★* + + + ★* + */ 

--#BLOCK_BEGIN# ForcePlanOn 
SET FORCEPLAN ON 
— #BLOCK_END# ForcePlanOn 

/***********************************************************************************/ 

— Remove rows older than fact table - history can not be rewritten - only 

— the last date for an order can be changed. Note that we compare transtype's 

— because SHIP type transactions might occur at a later date and we don't want 

— those to interfere 

-- Also, since the staging table may have multiple entries for a given order on 

— a single day - we assume that the list one inserted in the Staging table will 

— be used (since ikey is an IDENTITY column) 

— Note that a given ss_key must use the same Booking transtype for all of time, 

— otherwise the transtype_key 

— MFL : Mapped Filtered 

^★★*********************+**********+***************+*********-***+***+***************y 
--#BLOCK BEGIN# MakeMFL 


SELECT 

s . * 

INTO Order_0_MFL 
FROM 

OrderStage_MAP s, bus_process b 

WHERE 

( (s .date_key >= (SELECT MAX (date_key) FROM Order_0_A f WHERE 
s.iss = f.iss AND s.ss_key ® f.ss_key AND 
s . transtype_key = f . transtype_key) ) 

OR NOT EXISTS (SELECT * FROM Order_0_A f WHERE 

s.iss = f.iss AND s.ss_key = f.ss_key AND 
s . transtype_key = f . transtype_key) ) 

AND s .ikey = (SELECT MAX(t.ikey) FROM OrderStage_MAP t WHERE 
s.iss = t.iss AND 
s.ss_key = t.ss_key AND 

s. date_key = t.date_key AND 

t . process_key = b.process_key) 

AND 

s .process_key = b.process_key AND b .process_name = 'LoadState' 

— #BLOCK_END# MakeMFL 

/******************************************************* ******************★*********/ 
— Index MFL table for later queries 
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— #BLOCK BEGIN# IndexMFL 


EXEC t ' 

CREATE INDEX XOrder_0_MFL ON Order_0_MFL 
( 

iss, ss_key, date_key 

) 

') 


— #BLOCK_END# IndexMFL 

/***★*★ + *★*★****★*** ****************************************************************/ 

— Get oldest state rows for each unique sskey 

— We need to treat the first entry for each order 

— in the staging table separately from all others, since 

— only the first entry needs to be compared with 

— already existing fact entry rows to create transactions. 

— All subsequent dates for that order in the Fact table 

— can be delta' d with other staging table entries - see the 

— section below on Pairwise deltas. 

— MFL should be indexed 

— 1ST: The first record for each iss, ss_key 
/*************************************************************** ********** ***★★***★*/ 

— #BLOCK BEGIN# MakelST 


SELECT 

s . * 

INTO Order_0_lST 
FROM 

Order_0_MFL s 

WHERE 

s.date_key = (SELECT MIN (date_key) FROM Order_0_MFL t WHERE 
s.iss = t.iss AND s.ss_key = t.ss_key) 

— #BLOCK_END# MakelST 

y***********************************************************************************/ 
— Index 1ST for later queries 

y******************************************************'*****************************/ 
— #BLOCK BEGIN# IndexlST 


EXEC ( ' 

CREATE UNIQUE INDEX XPKOrder_0_lST ON Order_0_lST 
( 

iss, ss_key 

) 

') 


— #BLOCK_END# IndexlST 

/★★****★*★★** ********************************** ***************** ★★******★**★★*★*****/ 

— Insert negative BOOKs for changed dim keys 

— This query will add up all existing Books and Loss's 

— for this order and the net facts will be cancelled out 

— with the old Dimension keys. Note that an invariant of this 

— procedure is that only one set of dimensions at a time 

— can have non-zero facts. 
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— Fact table Should be indexed 

— HAVING Clause is needed to prevent changing of dimensions 

— on fully shipped order from causing a transaction - no sense 

— creating fact rows with all zero’s in them 

— Note that we increment the sequence number just in case 

— this new transaction occurs on the same date as the last 

— existing one in the fact table - to avoid index errors 

— IL: InsertLost 

/*************★***★**★********★** **-*-*************** + ********************************/ 
— #BLOCK BEGIN# MakelL 


SELECT 

s . iss, 
s . ss_key, 
s ,date_key, 
s . transtype_key, 

MAX ( f . seq) + 1 seq 
, f ,customerbillto_key 

, f .product_key 

, f ,application_key 

, f .program_key 

, f ,customershipto_key 

, f . territory_key 

, f . warehouse_key 

, -SUM ( f . net_price ) net_price 

, -SUM(f .number^units) number_units 

INTO Order_0_IL 
FROM 

Order_0_lST s, Order_0_A f 

WHERE 

s.iss = f.iss AND s.ss_key = f.ss_key 

AND 

( (s . territory_key <> f . territory_key) OR 

(s . customershipto_key <> f ,customershipto_key) OR 

(s . warehouse_key <> f . warehouse_key) OR 

(s . program_key <> f .program_key) OR 

{s . application_key <> f . application_key) OR 

( s . product_key <> f . product_key ) OR 

(s. customerbillto_key <> f . customerbillto_key) ) 

GROUP BY 

s.iss, 
s . ss_key, 
s .date_key, 
s . transtype_key 
, f .cus tome rbi lit o_key 

, f ,product_key 

, f .application_key 

, f ,program_key 

, . f .customershipto_key 

, f . territory_key 

, f ,warehouse_key 

HAVING 

MIN ( f . transtype_key ) = s . transtype_key 

AND 

( 

{ SUM ( f . net_price ) <> 0) 

OR (SUM (f .number_units) <> 0) 

) 

— #BLOCK_END# MakelL 

y***************************************************************************** ***★★*/ 
— Index IL for later queries 
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— #BLOCK BEGIN# IndexIL 


EXEC ( ' 

CREATE INDEX XPKOrder_0_IL ON Order_0_IL 

( 

iss, ss_key 

) 

') 


— #BLOCK_END# IndexIL 

^★***************************+**********+************+***********+***********+******/ 

— Insert BOOKs for changed dim keys 

— When a dimension changes then just create a booking 

— transaction for whatever we negated above with the new 

— dimension and fact values 

— 1ST shoud be indexed 

— Note that we add one to whatever we used as the last 

— seq because this transaction occurs on the same 

— date as the negative one above 

— IR: Insert Rebook 

/***************************************************************************** *★**★*/ 
—# BLOCK BEGIN# MakeIR 


SELECT 

s .iss, 
s . ss_key, 
s.date_key, 

1 . transtype_key, 
l.seq + 1 seq 

, s .customerbillto_key 

, s .product_key 

, s .application_key 

, s . program_key 

, s ,customershipto_key 

, s . territory_key 

, s . warehouse_key 

, -l.net_price net_price 

, -1 .number_units number_units 

INTO Order_0_IR 
FROM 

Order_0_IL 1, Order_0_lST s 
WHERE l.iss = s.iss AND l.ss_key = s.ss_key 

— #BLOCK_END# MakeIR 

/***********************************************************************************/ 

— Insert BOOKs for changed dim keys where fact 

— also changed 

— When a dimension changes at the same time as 

— a fact then we need to make up the fact difference 

-- 1ST shoud be indexed 

— Note that we add two to whatever we used as the last 

— seq because this transaction occurs on the same 

— date as the negative and positive ones above 
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— Note also that the Left Outer join uses transtype_key 

— so that only the Bookings at the old value will be counted. 

— Whereas above for the negative transaction value 

— we want to include Shipments in our calculation, here 

— we only want to see how Booking Facts have changed. 

— Here again, only one Booking transaction type is supported 

— per ss_key 

— IRD : Insert Rebook delta 

^************+**********++*********+++***************'******+***++*****+*************/ 
— #BLOCK BEGIN# MakeIRD 


SELECT 

s . iss, 
s . ss_key, 
s.date_key, 
s . transtype_key, 
l.seq + 2 seq 

, s.customerbillto_key 

, s ,product_key 

, s.application_key 

, s . program_key 

, s.customershipto_key 

, s.territory_key 

, s . warehouse_key 

, MAX ( s . net_price) -ISNULL (SUM ( f . net_price ) , 0) net_price 

, MAX (s ,number_units) -ISNULL (SUM (f.number_units) , 0) number_units 

INTO Order_0_IRD 
FROM 

Order_0_IL 1, Order_0_lST s 

LEFT OUTER JOIN Order_0_A f ON s.iss = f.iss AND s.ss_key = f.ss_key AND 
s . transtype_key = f . transtype_key 
WHERE 

l.iss = s.iss AND l.ss_key = s.ss_key 

GROUP BY 

s . iss, 
s . ss_key, 
s ,date_key, 
s . transtype_key, 
l.seq 

s . customerbillto_key 
s ,product_key 
s . application_key 
s.program_key 
s . cus tome r shipto_key 
s . territory_key 
s . warehouse_key 


(ISNULL (SUM(f .net_price) , 0) <> MAX (s .net_price) ) 

(ISNULL (SUM (f.number_units) , 0) <> MAX (s .number_units) ) 

— #BLOCK_END# MakeIRD 

/***********************************************************************************/ 

— Insert BOOKS for deltas with same dim keys OR for 

— brand new orders. 

— Note that we DON'T want to count Shipments. 

— (so shipment ss_key's should be different from 

— order ss_keys) since we just want bookings to sum up 

— to whatever this transcation says they should be. 

— Fact table should be indexed 


HAVING 

OR 
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— WHERE clause prevents double booking on changed 

— dimension - if we didn't use the NOT EXISTS clause 

— then this query would repeat the work of the last one 

— above - which we have already taken care of 

— HAVING clause ensures that multiple 0 records don't 

— get inserted whenever this procedure is run 

— Note that we increment the sequence number just in case 

— this new transaction occurs on the same date as the last 

— existing one in the fact table - to avoid index errors 

— IND: Insert New Delta 

/************* *********+*********************★************ ********* *****************/ 
— #BLOCK BEGIN# MakeIND 


SELECT 

s.iss, 
s . ss_key, 
s .date_key, 
s . transtype_key, 

ISNULL (MAX ( f . seq) , 0) + 1 seq 
, s . customerbillto_key 

, s .product_key 

, s . application_key 

, s .program_key 

, s . customershipto_key 

, s . territory_key 

, s . warehouse_key 

, MAX (s .net_price) -ISNULL (SUM (f.net_price) , 0) net_price 

, MAX (s.number_units) -ISNULL (SUM (f.number_units) , 0) number_units 

INTO Order_0_IND 
FROM 

Order_0_lST s LEFT OUTER JOIN Order_0_A f ON 

s.iss *= f.iss AND s.ss_key = f.ss_key AND f . transtype_key = s . transtype_key 

WHERE 

NOT EXISTS (SELECT * FROM Order_0_IL WHERE iss = s.iss AND ss_key = s.ss_key) 

GROUP BY 

s.iss, 
s . ss_key, 
s.date_key, 
s . transtype_key 
, s . customerbillto_key 

, s .product_key 

, s . application_key 

, s .program_key 

, s . customershipto_key 

, s . territory_key 

, s . warehouse_key 

HAVING 

(ISNULL (SUM(f.net_price) , 0) <> MAX (s .net_price) ) 

OR (ISNULL (SUM ( f . number_units) , 0) <> MAX (s .number_units) ) 


— # BLOCK_END# MakeIND 

/******************************************************************* *★**************/ 

— Form pairwise deltas for all rows except earliest for each sskey 

— Each row created in NFD will consist of two sequential entries from the 

— staing table. So if N enties for an order exist in MFL (after we have filtered 

— out same-date duplicates) then all the queries above will deal with the earliest entry, 
whereas 

— all the queries below (including this one) will deal with the N-l deltaing transactions 
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— This query assumes that MFL will already have been filtered 

— to have a single record for each order/datekey 

— NFD: Not First Delta 

/*****★*******★*■*★★★****★*★★★* ***************************************** ****** *★**★★*/ 
— #BLOCK BEGIN# MakeNFD 


SELECT 

s.iss siss, t.iss tiss 
, s.ss_key sss_key, t.ss_key tss_key 

, s.date_key sdate_key, t.date_key tdate_key 

, s . transtype_key stranstype_key, t . transtype_key ttranstype_key 

, s.customerbillto_key scustomerbillto_key, t . customerbillto_key tcustomerbillto_key 

, s .product_key sproduct_key, t .product_key tproduct_key 

, s .application_key sapplication_key, t . application_key tapplication_key 

, s .program_key sprogram_key, t .program_key tprogram_key 

, s . customershipto_key scustomershipto_key, t . customershipto_key tcustomershipto_key 

, s . territory_key sterritory_key # t . territory_key tterritory_key 

, s . warehouse_key swarehouse_key, t . warehouse_key twarehouse_key 

, s.net_price snet_price, t.net_price tnet_price 

, s .number_units snumber_units, t .number_units tnumber_units 

INTO Order_0_NFD 
FROM 

Order_0_MFL s, Order_0_MFL t 

WHERE 

s.iss = t.iss AND s.ss_key = t. ss_key 

AND 

s.date_key = (SELECT MAX (date_key) FROM Order_0_MFL u WHERE 
u.iss = s.iss AND u.ss_key = s.ss_key AND u.date_key < t.date_key) 

— #BLOCK_END# MakeNFD 

/****** + *****•*■**★★★***★*★★**********■*** + ********★****★★**********★****★ + *■* + ****★*****/ 

— Insert BOOKS for deltas with same dim keys 

— If the dimensions don't change then we create a 

— new booking order (as long as at least one of the facts 

— have changed) 

— I DM: Insert Delta More 

/**★************ ************************************************** ****** ************/ 

— #BLOCK BEGIN# MakelDM 


SELECT 

tiss iss, 
tss_key ss_key, 
tdate_key date_key, 
ttranstype_key transtype_key, 

0 seq 

, tcustomerbillto_key customerbillto_key 

, tproduct_key product_key 

, tapplication_key application_key 

, tprogram_key program_key 

, tcustomershipto_key customershipto_key 

, tterritory_key territory_key 

, twarehouse_key warehouse_key 

, tnet_price-snet_price net_price 

, tnumber_units-snumber_units number_units 

INTO Order_0_I DM 
FROM 

Order_0_NFD d 

WHERE 
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( 

(sterritory_key = tterritory_key) AND 
(scustomershipto_key = tcustomershipto_key) AND 
(swarehouse_key = twarehouse_key) AND 
(sprogram_key = tprogram_key) AND 
(sapplication_key = tapplication_key) AND 
(sproduct_key = tproduct_key) AND 
(scustomerbillto_key - tcustomerbillto_key) 

) 

AND 

( 

(snet_price <> tnet_price) 

OR (snumber_units <> tnumber_units) 

) 

— #BLOCK_END# MakelDM 

y***************************** ********************************************* ********* y 

— Insert negative BOOKs for deltas with different dim keys 

— If one of the dimensions change then we first create a lose transaction for 

— all the previous facts. (Negate all the facts from the earlier of the two 

— transactions) 

— ILM: Insert Lost More 

y***********************************************************************************y 
— #BLOCK BEGIN# MakeILM 


SELECT 

siss iss, 
sss_key ss_key, 
tdate_key date_key, 
stranstype_key transtype_key, 

0 seq 

, scustomerbillto_key customerbillto_key 

, sproduct_key product_key 

, sapplication_key application_key 

, sprogram_key program_key 

, scustomershipto_key customershipto_key 

, sterritory_key territory_key 

, swarehouse_key warehouse_key 

, -snet_price net_price 

, -snumber_units number_units 

INTO Order_0_ILM 
FROM 

Order_0_NFD d 

WHERE 

( 

(sterritory_key <> tterritory^key) OR 
(scustomershipto_key <> tcustomershipto_key) OR 
(swarehouse_key <> twarehouse_key) OR 
(sprogram__key <> tprogram_key) OR 
(sapplication_key <> tapplication_key) OR 
(sproduct_key <> tproduct_key) OR 
(scustomerbillto_key <> tcustomerbillto_key) 

) 

AND 

( 

(snet_price <> 0) 

OR (snumber_units <> 0) 

) 

— #BLOCK_END# MakeILM 

y***********************************************************************************/ 
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— Insert BOOKs for deltas with different dim keys 

— When a dimension key changes then we can simply insert all the new facts with the 

— new dimension keys 

— Note that seq = 1 here because this is the second transaction on this date for 

— this order. 

— IRM: Insert Rebook More 

/*★*******★*★***********★*******★*****★* + **★ •*■***•* + ***★ + *★**■**★*** + ****★*****★*★***★*/ 
— #BLOCK BEGIN# MakeIRM 


SELECT 

tiss iss, 
tss_key ss_key, 
tdate_key date_key, 
ttranstype_key transtype_key, 

1 seq 

, tcustomerbillto_key customerbillto_key 

, tproduct_key product_key 

, tapplication_key application_key 

, tprogram_key program_key 

, tcustomershipto_key customershipto_key 

, tterritory_key territory_key 

, twarehouse_key warehouse_key 

, tnet_price net_price 

, tnumber_units number_units 

INTO Order_0_IRM 
FROM 

Order_0_NFD d 

WHERE 

( 

(sterritory_key <> tterritory__key) OR 
(scustomershipto_key <> tcustomershipto_key) OR 
(swarehouse_key <> twarehouse_key) OR 
(sprogram_key <> tprogram_key) OR 
(sapplication_key <> tapplication_key) OR 
(sproduct_key <> tproduct_key) OR 
(scustomerbillto_key <> tcustomerbillto_key) 

) 

AND 

( 

(tnet_price <> 0) 

OR ( tnumber_units <> 0) 

) 

— # BLOC K_EN D # MakeIRM 

/******************************************* *****************★**★★******* + *****★****/ 

— Delete the output tables 

/***★+**★* **********+***************+*****************************+*****************/ 
— #BLOCK_BEGIN# DropOutput 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id = obj ect_id ( ' dbo. Order_0_B ' ) 7VND sysstat & Oxf = 
3) DROP TABLE Order_0_B 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( ? dbo.Order_0_INC ’ ) AND sysstat & Oxf 
= 3) DROP TABLE Order 0_INC 


— #BLOCK_END# DropOutput 

/★♦★a************************************* **•***** + * + *★**★**********★*******★★★*★★★★★/ 

— Create FC table in case force close was 
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— not run 

^*************************************+***************+*****************************y 

— #BLOCK_BEGIN# MakeFC 
DECLARE @ f c exists INT 


SELECT 0fc_exists = ( 

SELECT COUNT (1) 

FROM sysobjects 
WHERE 

id = object_id ( 'dbo.Order_0_FC' ) AND sysstat & Oxf - 3 

) 

IF (@fc_exists = 0) 

EXEC ( ' 

SELECT 


INTO Order_0_FC 
FROM 

Order_0_A 

WHERE 

1=0 


') 


— #BLOCK_END# MakeFC 

y*+*+**********+***************************+****************************************y 

— Create the incremental table 

/*************************************************** ************* *******************/ 
— #BLOCK BEGIN# MakeINC 


SELECT 

* 

INTO Order_0_INC 
FROM Order_0_TIN UNION ALL 
SELECT * FROM Order_0_IL UNION ALL 
SELECT * FROM Order_0_IR UNION ALL 
SELECT * FROM Order_0_IRD UNION ALL 
SELECT * FROM Order_0_IND UNION ALL 
SELECT * FROM Order_0_IRM UNION ALL 
SELECT * FROM Order_0_ILM UNION ALL 
SELECT * FROM Order_0_FC UNION ALL 
SELECT * FROM Order_0_IDM 

--#BLOCK_END# MakeINC 

/*★**★**★*★*** ***************************************** ★**★*★****★★★★**★**★★★**★****/ 

— CR158 : We want to load _IMI table and still keep the non-descending 

— order so that the clustered index on a fact table can be created 

— without sorting. This way can speed up significantly in creating a 

— clustered index on a very large already sorted fact table. 

/**★*★**★*** ****************************************** ***************************★**/ 

— # BLOCK BEGIN# MakelMI 


SELECT 

★ 

INTO Order_0_IMI 
FROM Order_0_A 

WHERE date key >= (SELECT MIN (date key) FROM Order 0 INC) 
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UNION ALL 

SELECT * FROM Order_0_INC 
ORDER BY 

date_key 

, customerbillto_key 

, product_key 

, application_key 

, program_key 

, customershipto_key 

, territory_key 

, warehouse_key 


— #BLOCK_END# MakelMI 

y********************************** *********++*****★*************************** *★**★/ 

— Create the new fact table and incremental table 

— Note that transaction tables must be built before 

— these statements are run 

/*★***** + **** + ★*** + ★★* ************************************************ ★*★★***** *★ + *★/ 
— # BLOCK BEGIN# MakeNewFact 


SELECT * 

INTO Order_0_B 
FROM Order_0_A s 

WHERE s.date_key < (SELECT MIN (date_key) FROM Order_0_INC) 

UNION ALL 

SELECT * FROM Order_0_IMI 
— #BLOCK_END# MakeNewFact 

y**********************************************************************+************y 

— Count processed, inserted rows 

y**************************************************** ************** *****************/ 

— #BLOCK_BEGIN# SPResults 
DECLARE @count_INC INT 
BEGIN 

SELECT @count_INC =* ( 

SELECT COUNT (1) 

FROM Order_0_INC 

) 

INSERT INTO adaptive_template__prof ile (token_name, number_rows) 

SELECT 'PROCESSED*, COUNT (1) FROM Order_0_MFL 

INSERT INTO adaptive__template_prof ile (token_name, number_rows) 

SELECT 'INSERTED', 0count_INC - COUNT (1) FROM Order_0_TIN 

END 

— #BLOCK_END# SPResults 

/★a*********************** ****** ***********************************y 

— Set join order for SQL Server 

/***************** *************************************************/ 

— #BLOCK_BEGIN# ForcePlanOff 
SET FORCEPLAN OFF 
— #BLOCK_END# ForcePlanOff 

y********************************************************** ***********★*************/ 
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-- Drop temp tables and TXN and TIN table 

/*********************** + ************* + + ********** *j* ★**★***★★★★* + ***★★************* + / 

— #BLOCK_BEGIN# DropTempsAf ter 


IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_TIN 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_TMI 

IF EXISTS (SELECT 1 FROM sysobjects 

3) DROP TABLE Order_0_FC 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_TXN 

IF EXISTS (SELECT 1 FROM sysobjects 

3) DROP TABLE Concat_MFL 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_lST 

IF EXISTS (SELECT 1 FROM sysobjects 

3) DROP TABLE Order_0_IL 

IF EXISTS (SELECT 1 FROM sysobjects 

3) DROP TABLE Order_0_IR 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_IRD 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_IND 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_NFD 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_IRM 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_IDM 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order_0_ILM 

IF EXISTS (SELECT 1 FROM sysobjects 

= 3) DROP TABLE Order 0_IMI 


WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id = 
WHERE id « 
WHERE id = 


object_id ( 'dbo 
object_id ( 'dbo 
object_id ( 'dbo 
object_id ( 'dbo 
object_id ( 'dbo 
object_id ( ' dbo 
ob j ect_id ( ' dbo 
object_id ( 'dbo 
object_id ( 'dbo 
object_id ( 'dbo 
object_id ( 'dbo 
object_id ( 'dbo 
ob j ect_id ( ' dbo 
ob j ect_id ( ' dbo 
object_id ( 'dbo 


Order_OjTIN' ) 
Order_0_TMI ' ) 
Order_0_FC* ) 
Order_0_TXN ' ) 
Concat_MFL' ) 
Order_0_lST ' ) 
Order_0_IL’ ) 
Order_0_IR* ) 
Order_0_IRD ' ) 
Order_0_IND' ) 
Order_0_NFD ' ) 
Order_0_IRM' ) 
Order_0_IDM* ) 
Order_0_ILM' ) 
Order 0 IMI ' ) 


AND sysstat & Oxf 
AND sysstat & Oxf 
AND sysstat & Oxf = 
AND sysstat & Oxf 
AND sysstat & Oxf = 
AND sysstat & Oxf 
AND sysstat & Oxf = 
AND sysstat & Oxf = 


AND 

sysstat 

& 

Oxf 

AND 

sysstat 

& 

Oxf 

AND 

sysstat 

& 

Oxf 

AND 

sysstat 

& 

Oxf 

AND 

sysstat 

& 

Oxf 

AND 

sysstat 

& 

Oxf 

AND 

sysstat 

& 

Oxf 


— #BLOCK_END# DropTempsAf ter 

— #TEMPLATE_END# load_State 

— #TEMPLATE_BEGIN# load_trans 

y*********************************************************************************/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— load_trans 

— Move transaction-like staging data into Fact table - create a temp 

— table with TXN extension that has all old rows along with new rows. 

— Also produce a TIN (TXN INC) table that has only the new rows 

— Note that the new table will also include all existing rows from 

— the Fact table. 

/★★****** ******************************************************* *********★********/ 

/★*** + ***************** **************************************** ******★***★*★*★•** + */ 

— Delete output tables 

— Output table is called TXN and includes old and new rows 

— Also, leave around _TIN as incremental table from this 

— procedure 

— We also create a table called _TMI which contains all the 

— _TIN records plus the records of overlapping period from the 

— old existing fact table. 

/*********+*********★******★*★★**+***********+***★★*★*★★****•****+**★*********★**★★/ 
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— #BLOCK_BEGIN# RemoveOutput 


IF EXISTS {SELECT 1 FROM sysobjects WHERE id 
=* 3) DROP TABLE Order_0_TXN 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
= 3) DROP TABLE Order_0_TMI 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id 
= 3) DROP TABLE Order 0 TIN 


ob j ect_id ( ' dbo . Order_0_TXN ' ) 
ob j ect_id { 1 dbo . Order_0_TMI ' ) 
ob j ect_id ( ' dbo . Order_0_TIN ' ) 


AND 

sysstat 

& 

Oxf 

AND 

sysstat 

& 

Oxf 

AND 

sysstat 

& 

Oxf 


— #BLOCK_END# RemoveOutput 

/**★*****★ + ★★*★**★*** + ***★***■******★★ + **★* + **★★***********★*★★**★**/ 

— Set join order for SQL Server 

/*****★**********★*******★******** **★**★★+**★** ******************** y 
--#BLOCK_BEGIN# ForcePlanOn 
SET FORCEPLAN ON 
— #BLOCK_END# ForcePlanOn 

— Remove stuff already in fact table 

— Note that currently this filter implies that once a transactional 

— fact entry is made it cannot be changed - and no further fact 

— entries on that date or any previous date can be made either 


— #BLOCK BEGIN# CreateTIN 


SELECT 

s . iss, 
s . ss_key, 
s . date_key, 
s . transtype_key, 
s.ikey seq 

, s . customerbillto_key 

, s ,product_key 

, s . application_key 

, s ,program_key 

, s ,customershipto_key 

, s . territory_key 

, s . warehouse_key 

, s.net_price 

, s ,number_units 

INTO Order_0_TIN 
FROM 

OrderStage_MAP s, bus_process b 

WHERE 

NOT EXISTS (SELECT * FROM Order_0_A f WHERE 
s.iss = f.iss AND , 
s.ss_key = f.ss_key AND 
f.date_key >= s.date_key) 

AND ( 

(s.net_price <> 0) 

OR (s .number_units <> 0) 

) 

AND 

s .process_key = b.process_key AND b.process_name = *LoadTrans' 
— #BLOCK_END# CreateTIN 

/******************************************************************/ 
— Set join order for SQL Server 

^*********************************** *****★**★**★**★**■*****★*■*★*★+*★ j 
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— #BLOCK_BEGIN# ForcePlanOff 
SET FORCEPLAN OFF 
— # BLOCK_END# ForcePlanOff 

— CR158: We want to load _TMI table and still keep the non-descending 
-- order so that the clustered index on a fact table can be created 

-- without sorting. This way can speed up significantly in creating a 

— clustered index on a very large already sorted fact table. 
/*********************************************************************************^ 

— #BLOCK BEGIN# CreateTMI 


SELECT 

* 

INTO Order_0_TMI 
FROM 

Order_0_A 

WHERE 

date_key >= (SELECT MAX (date_key) FROM Order_0_TIN) 
UNION ALL 
SELECT 

* 

FROM 

Order_0_TIN 
ORDER BY 

date_key 

, customerbillto_key 

, product_key 

, application_key 

, program_key 

, customershipto_key 

, territory_key 

, warehouse_key 


— #BLOCK_END# CreateTMI 

/********-********************************************************************* * * * ★ / 
— Insert everything into the new fact table 

/*********************************************************************************y 
— #BLOCK BEGIN# CreateTXN 


SELECT 

* 

INTO Order__0_TXN 
FROM 

Order_0_A s 

WHERE s.date_key < (SELECT MAX (date_key) FROM Order_0_TIN) 

UNION ALL 
SELECT 

* 

FROM 

Order_0_TMI f 
— # BLOCK_END# CreateTXN 

/*********************************************************************************y 

— Count inserted data and put results into communication table 
/*********************************************** **********************************/ 

— # BLOCK_BEGI N # SPResultS 
BEGIN 


Method and Apparatus for Creating a Well- PATENT 
Formed Database System Using a Computer Page 147 

Attorney Docket No. 20308.702 
: :ODMA\PCDOCS\SQL 1 \2280 1 7\ I 


Inventors: Craig D. Weissman, 
Greg V. Walsh and Eliot L. Wegbreit 




INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT ' PROCESSED' , COUNT (1) FROM Order Stage_MAP 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT ’INSERTED*, COUNT (1) FROM Order_0_TIN 

END 

— #BLOCK_END# SPResultS 
- - #TEMPLATE_END# load_trans 
— #TEMPLATE_BEGIN# index_fact 

/*************************************************************************************/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— Post processing after an extraction run 

— Reindex fact tables 

— CR158: added WITH SORTED_DATA in creating cluster index on fact table 

— Remove any temp tables generated during the extraction 
/*************************************************************************************/ 

/*************************************************************************************/ 

— Primary key index the fact table 

/******************* *********************** *******************************************/ 
— #BLOCK BEGIN# PKIndexFact 


EXEC ( ' 

CREATE UNIQUE INDEX XPKOrder_0_B ON Order_0_B 
( 

iss , ss_key , date_key , transtype_key , seq 

) 

') 


--#BLOCK_END# PKIndexFact 

/*************************************************************************************/ 
— Inversion index the fact table 

/******************************************************** *,* *************************** i 

— # BLOCK BEGIN# IEIndexFact 


EXEC ( ’ 

CREATE CLUSTERED INDEX XIEKOrder_0_B ON Order_0_B 
( 

date_key 

, customerbillto_key 

, product_key 

, application_key 

, program_key 

, customershipto_key 

, territory_key 

, warehouse_key 

) WITH SORTED_DATA 

') 


— #BLOCK END# IEIndexFact 

Method and Apparatus for Creating a Well- PATENT Inventors: Craig D. Weissman, 

Formed Database System Using a Computer Page 148 Greg V. Walsh and Eliot L. Wegbreit 

Attorney Docket No. 20308.702 
::ODMA\PCDOCS\SQL1\228017\1 






— Remove any mapped tables 

— # BLOCK_BEGIN# RemoveTemps 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( *dbo. Order Stage_MAP ' ) AND sysstat & 
Oxf = 3) DROP TABLE OrderStage_MAP 


— #BLOCK_END# RemoveTemps 

— #TEMPLATE_END# index_fact 
— #TEMPLATE_BEGIN# ren_trans 

y********************** *********** + ********************** ****★★*****★ + *★/ 

-- Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— ren_trans 

-- Epiphany Marketing Software, 1997 

— Simply change the name of the transaction new table to the 

— actual fact table name - used for Fact tables that don't have 

— any stored procedure other than load_trans attached to them 

y***********************************************************************y 

y***********************************************************************y 

— Delete the output tables 

y******* ************+**********+**************************************** y 
— #BLOCK_BEGIN# RemoveOutput 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( ' dbo.Order_0_B ' ) AND sysstat & Oxf = 
3) DROP TABLE Order_0_B 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id =* object_id ( ' dbo.0rder_0_INC ' ) AND sysstat & Oxf 
=» 3) DROP TABLE Order_0_INC 


— #BLOCK_END# RemoveOutput 

y*************** ****** ********* *****************************************y 

— Move all transaction rows into the correct new fact table 

— name. Note that we would use sp_rename, except it 

— doesn't work with DB name prefixes 

— TBD: Rename instead of re-select 

y***********************************************************************y 
— # BLOCK BEGIN# BuildNewFact 


SELECT 

* 

INTO Order_0_B 
FROM 

Order_0_TXN 

— # BLOCK_END# BuildNewFact 

y***********************************************************************y 
— Preserve incremental table 

y*********************** ★**★**★+** **************************************y 
— #BLOCK BEGIN# Buildlncremental 


Method and Apparatus for Creating a Well- PATENT 
Formed Database System Using a Computer Page 149 

Attorney Docket No. 20308.702 
::ODMA\PCDOCS\SQL 1X22801 7\1 


Inventors: Craig D. Weissman, 
Greg V. Walsh and Eliot L. Wegbreit 



SELECT 



INTO Order_0_INC 
FROM 

Order_0_TIN 

— # BLOCK_END# Buildlncremental 

/*******************+****+******★★******* *■****★****★***★+*★*★***★**★**★*/ 

— Count inserted data and put results into communication table 
/***★****★*******★★**★*★★+**+★+*★**★****** ★★*■★★*******★*****★★*+******★*/ 

— #BLOCK_BEGIN# SPResults 

BEGIN 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'PROCESSED', COUNT (1) FROM Order_0_TXN 

INSERT INTO adaptive_template jprof ile (token_name, number_rows) 

SELECT 'INSERTED', COUNT (1) FROM Order_0_TXN 

END 

— # BLOCK_END# SPResults 

y***********************************************************************/ 

— Remove temp tables 

— #BLOCK_BEGIN# RemoveTemps 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id = obj ect_id ( ' dbo . Order_0_TXN ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order_0_TXN 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( ' dbo. Order_0_TIN ' ) AND sysstat & Oxf 
» 3) DROP TABLE Order_0_TIN 

IF EXISTS (SELECT 1 FROM sysobjects WHERE id = object_id ( * dbo . Order_0_TMI ' ) AND sysstat & Oxf 
= 3) DROP TABLE Order 0 TMI 


— #BLOCK_END# RemoveTemps 
— #TEMPLATE_END# ren_trans 
— #TEMPLATE_BEGIN# map_keys 

y******************************************************************/ 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved. 

— map_keys 

— Epiphany Marketing Software 

t 

— Map dimension keys from Staging table and report 

— on unjoined rows 

/*************************************** *******★*********★★******★*/ 
/★★★it****************************** ********************************/ 

— Remove output table 

/********************************************************* ★+*****★*/ 

— #BLOCK_BEGIN# DropTemp 


IF EXISTS (SELECT 1 FROM sysobjects WHERE id = obj ect_id ( ' dbo ,OrderStage_MAP • ) AND sysstat & 
Oxf = 3) DROP TABLE OrderStage_MAP 
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— #BLOCK_END# DropTemp 


/★★a-***************************************************************/ 

— Set join order for SQL Server 

y★★★ + *****■***★**•* , ***★*★★****★★★***★★★★★★■* , + ★★★★★* , + + + ★*★★ + , *•★★★★★ , * ,, * , ■* , *★^ 
— #BLOCK_BEGIN# ForcePlanOn 
SET FORCEPLAN ON 
— # BLOC K_EN D# ForcePlanOn 

/************************************************************* ★'* * * * / 

— Map dimension keys via Inner joins 

/*******+★***★★ ***********★***+*++***★**************+*+************/ 

— #BLOCK_BEGIN# MapAll 


SELECT 

s.iss, 
s . ss_key, 
s .date_key, 
s . transtype_key, 
s . ikey, 
s .process_key 

, m_04 .program_key program_key 

, m_03 . application_key application_key 

, m_06 . territory_key territory_key 

, m_02 .product_key product_key 

, m_05 .customer_key customershipto_key 

, m_01 .customer_key customerbillto_key 

, m_07 . warehouse_key warehouse_key 


, s.net_price 

, s ,number_units 

INTO Orders tage_MAP 
FROM 

OrderStage s 

, ProgramMap_B m_04 (index = 1) 

, ApplicationMap_B m_03 (index = 1) 

, Terri toryMap_B m_06 (index = 1) 

, ProductMap_B m_02 (index = 1) 

, CustomerMap_B m_05 (index - 1) 

, CustomerMap_B m_01 (index = 1) 

, WarehouseMap_B m_07 (index =1) 

WHERE 1=1 

AND m__04.iss = s.iss AND m_04 .program_sskey = s .program_sskey 

AND m_03.iss = s.iss AND m_03 . application_sskey = s . application_sskey 

AND m_06.iss = s.iss AND m_06 . territory_sskey *» s . territory_sskey 

AND m_02.iss = s.iss AND m_02 .product_sskey = s ,product_sskey 

AND m_05.iss = s.iss AND m_05 . cus tome r_ss key = s . customershipto_sskey 

AND m_01.iss = s.iss AND m_01 . customer_sskey = s . customerbillto_sskey 

AND m_07.iss = s.iss AND m_07 . warehouse_sskey = s . warehouse_sskey 

— #BLOCK_END# MapAll 
— Set join order for SQL Server 

/***********★*******★******************★********-*******************/ 

— #BLOCK_BEGIN# ForcePlanOff 
SET FORCEPLAN OFF 

— #BLOCK END# ForcePlanOff 
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— Look for unjoined data, Report on processed rows 
— #BLOCK BEGIN# SPResults 


DECLARE @un joined INT 
DECLARE @processed INT 

BEGIN 

SELECT ©processed = ( 

SELECT COUNT (1) 

FROM OrderStage 
) 

SELECT ©unjoined = ( 

SELECT ©processed - COUNT (1) 

FROM OrderStage_MAP 
) 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 
SELECT 'UNJOINED', ©unjoined 

INSERT INTO adaptive_template_prof ile ( token_name, number_rows) 
SELECT 'PROCESSED', ©processed 

INSERT INTO adaptive_template__profile (token_name, number_rows) 
SELECT 'INSERTED', ©processed - ©unjoined 

END 

— # BLOC K_EN D # SPResults 

/************************************** ************ ****************/ 
— Index this temp table 

/*****************★************************************************/ 
— #BLOCK_BEGIN# IndexMap 


EXEC ( ’ 

CREATE INDEX XOrderStage_MAP ON OrderStage_MAP 
( 

iss, ss_key, date_key, ikey 

) 


— # BLOCK_END# IndexMap 

— #TEMPLATE_END# map_keys 
— #TEMPLATE_BEGIN# upd_unj 

/*************^*******************************************************y 

— Copyright * 1997, Epiphany Marketing Software, Inc. All Rights Reserved 

— upd_un j 

— Epiphany Marketing Software 

— Update all dimension keys to 'UNKNOWN' in staging table 

— where referential integrity fails 

/******************************************************* **★*★*★******★/ 
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/*********************** **********************************************y 

— Count the number of rows to update in the staging table - that is, those 

— that have at least one Foreign key where referential integrity fails 
/************************* **************** + ***★*****★**★**★* ****** + ***/ 

--#BLOCK_BEGIN# CountUnj 

BEGIN 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT ’PROCESSED’ , COUNT ( 1 ) FROM OrderStage 

INSERT INTO adaptive_template_prof ile (token_name, number_rows) 

SELECT 'MODIFIED', COUNT (1) 

FROM 

OrderStage s 
WHERE 1=0 

OR NOT EXISTS (SELECT 1 FROM ProgramMap_B m_04 WHERE m_04.iss = s.iss AND m_04 .program_sskey = 
program_sskey) 

OR NOT EXISTS (SELECT 1 FROM ApplicationMap_B m_03 WHERE m_03.iss = s.iss AND 
m_03 ,application_sskey = application_sskey) 

OR NOT EXISTS (SELECT 1 FROM Terri tor yMap_B m_06 WHERE m_06.iss = s.iss AND 
m_06 . territory_sskey = territory_sskey) 

OR NOT EXISTS (SELECT 1 FROM ProductMap_B m_02 WHERE m_02.iss = s.iss AND m_02 . product_sskey = 
product_sskey) 

OR NOT EXISTS (SELECT 1 FROM CustomerMap_B m_05 WHERE m_05.iss = s.iss AND m_05 . cus tome r_ss key 
= customershipto_sskey) 

OR NOT EXISTS (SELECT 1 FROM CustomerMap_B m_01 WHERE m_01.iss = s.iss AND m_01 . oust omer_ss key 
= customerbillto_sskey) 

OR NOT EXISTS (SELECT 1 FROM WarehouseMap_B m_07 WHERE m_07.iss = s.iss AND 
m_07 ,warehouse_sskey = warehouse_sskey) 

END 

— # BLOCK_END# CountUnj 

/*********************************************************************/ 

— Update foreign keys where referential integrity fails 
/************************************************************ * + *★** + **/ 

— #BLOCK_BEGIN# UpdateUn jprogram_sskey 

UPDATE OrderStage SET program_sskey = ’UNKNOWN’ 

WHERE NOT EXISTS (SELECT 1 FROM ProgramMap_B m 

WHERE m.iss = OrderStage .iss AND m.program_sskey = OrderStage .program_sskey) 

— #BLOCK_END# UpdateUn jprogram_ss key 

— #BLOCK_BEGIN# UpdateUn j application_sskey 

UPDATE OrderStage SET application_sskey » ’UNKNOWN’ 

WHERE NOT EXISTS (SELECT 1 FROM ApplicationMap_B m 

WHERE m.iss = OrderStage . iss AND m. application_sskey = OrderStage . application_sskey) 

— #BLOCK_END# UpdateUn japplication_ss key 

— #BLOCK_BEGIN# UpdateUn jterritory_sskey 

UPDATE OrderStage SET territory_sskey = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM TerritoryMap_B m 

WHERE m.iss = OrderStage . iss AND m. territory_sskey = OrderStage . territory_sskey) 

— #BLOCK_END# UpdateUn j territory_sskey 

— #BLOCK_BEGIN# UpdateUn jproduct_sskey 

UPDATE OrderStage SET product_sskey = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM ProductMap_B m 

WHERE m.iss = OrderStage . iss AND m.product_sskey = OrderStage .product_sskey) 

— # BLOCK END# UpdateUnjproduct sskey 
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— #BLOCK_BEGIN# UpdateUn j customershipto_sskey 


UPDATE OrderStage SET customershipto_sskey = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM CustomerMap_B m 

WHERE m.iss = OrderStage . iss AND m. customer_sskey = OrderStage . customershipto_sskey) 
— #BLOCK_END# UpdateUn jcustomershipto_sskey 


— #BLOCK_BEGIN# UpdateUn j customerbillto_sskey 

UPDATE OrderStage SET customerbillto_sskey = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM CustomerMap_B m 

WHERE m.iss = OrderStage . iss AND m. customer_sskey = OrderStage . customerbillto_sskey) 

— #BLOCK_END# UpdateUn j customerbillto_sskey 

— #BLOCK_BEGIN# UpdateUn j warehouse_sskey 

UPDATE OrderStage SET warehouse_sskey = 'UNKNOWN' 

WHERE NOT EXISTS (SELECT 1 FROM WarehouseMap_B m 

WHERE m.iss = OrderStage . iss AND m. warehouse_sskey = OrderStage . warehouse_sskey) 

— #BLOCK_END# UpdateUnj warehouse_sskey 


— #TEMPLATE_END# upd_unj 


Note, additional semantic types and adaptive templates can be imported into the system 100. 
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